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NEWSLETTER SUBMISSIONS 


The Newsletter is currently published bi-monthly in the odd months. The 
deadline for each issue is the last Friday of the preceding even 
numbered month. Submissions are accepted at all times and are normally 
used in the next issue to go to press regardless of date of receipt. 
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be single spaced on white bond paper whenever possible and must be 
reasonably clean, legible and sufficiently dark for good photographic 
reproduction. 
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Jonathan Lockwood 
Harris Semiconductor 


PO Box 883 
Melbourne, FL 32901 
(305) 724-7542 M.S. 54-40 


Special Steering Committee Advisors: 

Tom W. McIntyre Stan Rabinowitz 
RTS-8 Working Group 

Lee Nichols - see above 

Micro-8 Working Group 

Jonathan Lockwood - see above 

Symposium Software Exchange Committee 


Send copies of software you wish to exchange at the next U.S. Symposium 
to the appropriate committee member for preparation: 


DECtapes Russell Overbey 

DEC floppys PO Box Y Bldg. 92101-2 

AED floppys Oak Ridge National Laboratory 
Oak Ridge, TN 37830 

DECtapes Earl. Te EL iiss (dt. 

Magtapes USCG R & D Center 

DEC floppys Avery Pt. 


Groton, CT 06340 
(203) 445-8501 Ext. 296 
(FTS) 642-7274 Ext. 296 


LINCtapes Larry Alber 
FDA Room 1222 
433 W. Van Burren 
Chicago, IL 60607 
C312) 353-5663 


ENGINEERING SPECIAL INTEREST GROUP 


Walter V. Dixon wrote to say that he is putting together the first issue 
of a newsletter for the Engineering SIG. He is interested in 
identifying the interests of the engineering user community and how his 
newSletter can best serve them. He invites comments and contributions. 
His address is Mechanical Technology Inc., 968 Albany-Shaker Road, 
Latham, New York, 12110 - phone: (518) 785-2211. 
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FALL DECUS/US SYMPOSIUM 


The preliminary schedule for the Fall Symposium shows about 16 hours of 
12 Bit related sessions. Details on the sessions were not available at 
press time but the following session titles are listed: 


12-Bit SIG 

Road Map 

Meeting 

Short Notes Session 
DECSTATION 78/88 Software Workshop 
12-Bit Microprocessor 

Applications 

Hardware Paper 
PDP-8 Programming Tools Workshop 
RTS-8 Papers 
PDP-8 Educational Instructions Panel 
PDP-8 Product Panel 
OS/8 Papers 
12-Bit Wrap Up 


The TECO Tutorial should also be of interest to 12-Bit users 


More detailed information should be in the mail soon from DECUS/US to 
U.S. members and others who request it. See you there. 


OS/78 VERSION 2 


I recently ordered and received the OS/78 V2 update kit. When ordered 
as an update for those who have OS/78 V1, it cost something like $20. 
The SPD says something about an upgrade kit for OS/8 V3D owners but I do 
not have any details or costs. The main reason an OS/8 user might want 
the OS/78 V2 kit (available only on floppy disks of course) is to get 
access to the new version of BASIC. This is a major upgrade of the 
existing OS/8 BASIC. The official description of the features are in 
the SPD and the manuals. You should check them for full details, but 
here are some of the features I have found interesting. 


The VT-52 scope is supported much better. The proper rubout 
sequences are used and Control S and Control Q are supported as 
well as the SET TTY PAUSE feature for controlling output on fast 
CRIS 


The BASIC editor, and programs written in BASIC can both handle 
the full seven bit upper and lower case ASCII character set 
rather than the old 6 bit, 64 character, upper case only set. 


The RS command is the same as the RUN command, except that 
before the program starts, a report is printed to show how much 
free space is left. This allows you to evaluate the size of 
your programs better than before. This same feature is 
available with the CCL EXECUTE command as the /S option. 
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LIST, LISTNH and DELETE now work on sel : 
numbers. ected ranges of line 


There is an EDIT command that will search for i 

a character st 

on a line and replace with a new one. This removes the Weca bee 
completely retype every line with an error. It also allows 
copying lines to new line numbers without having to retype them 


The SEQUENCE command sets a starting line number and a line 
number increment. In this mode the system automatically 
supplies the line numbers as you enter the program. . 


The WEAVE command will read a program in over one already in 
core (i.e. an OLD that does not clear the previous program). 
This simplifies combining sections of code in separate files. 


The old hacks involved in numeric input (i.e. the need for 
inputting dummy variables at the end of lines, etc.) are gone. 
It looks as though BASIC finally works the way it should. 


ON-GOTO and ON-GOSUB have been added to transfer control based 
on the value of an expresion. 


A new IF OPEN # statement has been added. It is now possable to 
tell if the open of a file was succesful and to avoid a program ~~ 
abort. Unfortunatly, there is still no way to avoid a warning | 
message that is typed when a file open fails, however. 


A form of PRINT USING has been added. It allows considerable 
control over output formats. It is not as general as some more 
advanced versions such as in the PDP-11 BASIC-PLUS but it gives 
the controls needed for doing business reports and checks and so 


on. 


The TAN and ATN functions have been added. 


The CAP$ function converts lower case characters to upper case. 
This is handy because the comparison operations on strings do 


not ignore case. 


The CCL command allows a program to exit and pass a command to 
CCL for execution. This hook has many interesting possibilities 
and reduces the need to run under batch in some kinds of 


applications, thus saving space. 


The OCT function returns the decimal value of a string of octal 
digits. 

The OCS$ function returns an 8 digit string with the octal value 

of of the variable argument. _ 


The PNT function and the documentation allow control of the 
al features of the VT-52 terminal and the CUR$ function 


speci 
atically sends the correct sequence of controls to do 


autom 
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direct cursor positioning on the VT-52. 


The AND and IOR do the bitwise logical AND and Inclusive OR 
operations on the binary representations of decimal numbers. 


The KEY$ function automatically inputs one character from the 
keyboard. I1f an escape sequence is received this function 
handles it. 


The PMT$ function allows changing BASIC's standard "?" prompt 
character to any O through 7 character string. 


Commercial arithmetic (i.e. greater than 6 digit precision) is 
Supported via string arithmetic. You can do the four basic 
operations on values stored as digits in strings. The values 
can be integers and/or fractions and up to 15 digits long. 


DIRECT RECORD I/O is provided for storing, retrieving, and 
updating individual records in mass storage files. This feature 
is similar to the FORTRAN direct access mode but it is much 
better. Data records are of fixed length and are stored in the 
file in standard OS/8 ASCII character format, complete with a 
carrage return and line feed at the end of each record and a 
control-z at the end of the file so it can be accessed with 
Standard software. Even better is the fact that the records are 
fully packed, and they automatically span block boundaries. 

This means that there is no wasted space as in OS/8 FORTRAN IV 
where at most one record per block is recorded. 


New, improved facilities are provided for compiling and saving 
programs so they may be run without recompiling every time. On 
the relatively slow DECstation 78 this is very valuable. 
Unfortunatly, there seems to be a bug that cause problems if 
your program depends on information that loads in the top page 
of field 2. For example, the executable code could be larger 
than one field (it loads from the top down), or you might depend 
on data storage being initialized to zero (it loads down from 
the executable code). The bug has to do with the handling of 
one versus two page system handlers at compile and at run times. 
DEC Knows about this bug already but no fix has been published 
yet and it is not documented in the release materials. 


The new release includes a "Multifunction Operation" feature. This is 
the "Symbiont" mentioned in a previous newsletter. You have the normal 
OS/78 operation in the first three fields and at the same time a second 
task that runs on interrupts can be in field 3. The symbiont task 
supplied with V2 is a print spooler. You have new monitor commands to 
Start and stop the symbiont, to pass the spooler task a list of files to 
be listed on the printer, and to check on the status of the spooler. If 
you want, you are permitted to write your own symbiont task. 


The following is the full explanation of what rules a user written 
program must observe to allow it to coexist with a symbiont. 
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1) If the program loads into page zero of field zero, then it must 
contain the following code: 


FIELD 0 


Also, locations 0,1 and 2 must not be used as scratch or as 
data. 

2) If the program does not load into or use page zero of field 
zero, then no modifications are necessary. 

3) The program must not use page zero of field zero as a buffer or 
data area. However, you may swap the OS/78 command decoder in 
this area. 

4) The program must never turn interrupts on or off. 

5) The program should not modify the software core size. 

6) The program must not require the use of field 3. 


In general the Symbiont feature will only work under OS/78 V2 on a 
DECstation-like configuration. This is because no Data Break devices 

may be used, you must be able to disable interrupts from all devices, in 
particular the console terminal that comes up enabled and which can not 

be disabled on the older PDP-8 family machines, and because you must 

have the new OS/78 versions of all the system programs that have been same 
modified to observe the above conventions. 


OS/78 V2 also includes support for multicharacter switchs in CCL 
commands. For example you can say "DIR /BRIEF" rather than "DIR /F". 
This is a rather nice feature. The multicharacter switches are often 
easier to remember and teach. The ":" character can also be used in 
place of "=" for setting numeric values after multicharacter switches. 
For example "/I=24" can be expresed as "/IMAGE:24", Users of other DEC 
systems that support DCL rather than CCL will recognize these forms. 
Since DCL is DEC's new standard command language that is replacing CCL 
in most systems, as much compatibility as possible is desirable. 


Unfortunatly, in OS/78 DEC is not providing the source of CCL so you can 
not change or extend the list of multicharacter switches and commands. 

I think this is a serious problem and I hope it does not propagate to 
the next release of OS/8 if and when it ever comes. Although it was the 
intention of the new CCL code to pass through all single character 
Switches just as always, there seems to be a bug, at least in the 
DIRECTORY command. If one tries to pass the /A switch, it does not get 
through but seems to be mapped to some other, strange bit. I hope this 
gets fixed so we can use the Alphabetize feature of the user enhanced 
version of DIRECT. 


NOTE FROM JIM VAN ZEE 


Jim writes to say that he and Carl Appelof have just managed to transfer 
the source files for ADVENTURE (DECUS 11-340) from an RT-11 floppy disk 
to an OS/8 floppy disk. He notes that so far the program will not run 
(it needs a lot of modifying to fit and run under OS/8 FORTRAN IV) but 
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the system used to do the transfer might be interesting. Jim writes: 


"The basic ingedients are an assembly language program which Carl wrote 
for the 11 and the byte-mode handler developed by Steuart Dewar for the 
8 which was described in the last Newsletter (#29, p15). Dewar's 
handler uses a very straight-forward sector interleaving scheme (as 
opposed to that used by Lynch's handler, for example) which makes it 
relatively simple to read/write on the 11. We have made no attempt to 
create a directory, so to recover the files we just used U/W-FOCAL to 
copy them since this program allows file input from specific block 
numbers. One could also just write a rather simple program to do the 
same thing, or better still, just use something like PIP or FUTIL (or 
even UWF !) to create the directory after-the-fact, providing one left 
room for it at the beginning. ..." 


"T don't know if this is useful to anyone else or not, or if (as seems 
likely) someone else has already developed a better way to move files 
between 11's and 8's. Anyone interested (or better informed!) can write 
me c/o Dept. of Chemistry, University of Washington, Seattle, WA 98195. 
Anyone who wants a copy of ADVENTURE on an OS/8 medium is welcome to a 
copy, but please include ample return postage." 


Having gotten sources to both the RT-11 and PDP-10 versions of ADVENTURE 
via other means, and having looked at the conversion to OS/8 FORTRAN IV, 
I can report that it is going to be quite a job and need most of 32k. I 
have run the game a good bit on an RT-11 system and it is great fun. 

The conversion would be worthwhile for people with a big 8 and no access 
to an 11 who like this sort of thing. It is far better and more complex 
than STARTREK for example. 


On the subject of moving data files between 8's and 11's, I may have 
mentioned in the Newsletter that a year or two ago I managed to develop 
a means for moving files from the 8 to the 11 on an RKO5S disk (note: the 
hardware makes that imposable but I did it anyway). The disk is 
organized as an OS/8 file structured device and I have programs written 
in RT-11 FORTRAN to access the files via the directory. The only reason 
I do not go from the 11 back to the 8 is that I never got around to 
writting the FORTRAN routine to create files in the OS/8 directory. If 
ever there is an overwelming demand, I might do a Newsletter article on 
how all this is done and/or resurrect the code and make it available (I 
don't know if a bug free version of the sources still exists, it might 
have to be worked up again from backup versions). (RH) 


DECSYSTEM 8 ENHANCEMENTS 


Lyle P. Bickley sent a note to say that he has been working with Don 
Harmer on enhancements to the version of CCL that goes with DECsystem 8 
for OS/8 V3D. He has added the following features: 


"=" can be used in CCL commands in addition to "X" and " ", For 
example, the command "DIR TEST.XX=DTA1:/E=5" is now valid. So 
is "COPY FILE1=FILE2". This feature improves compatibility with 
the DECsystem 10 moniter TOPS 10. 
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a 
The "F(UTIL)" command (see newsletter #28) is fully implemented. 
If you oe aati and do not want to wait for Don to release this 
version o system 8, you should contact Lyl t 4 j 
Glen Mills, PA 19342. — Best ge ant SU RE se 
NOTE FROM ERIC WOGSBERG 
Eric wrote to say that he is selling a PDP-8A based system and some 
extra option boards. Anyone interested can contact him at Computer 
Technology, 6043 Lawton Ave, Oakland, CA. 94618 (415) 653-4844, 
THE 
GEORGE 
WASHINGTON 
UNIVERSITY 
MEDICAL CENTER 676-2692 
Office of Computer Assisted Education / 2300 Eye Street, N.W. / Washington, D.C. 20037 | (202) B8KKSAT 
aim, 


August 8, 1978 


Robert Hassinger, Coordinator 
12 Bit Sig 

Liberty Mutual Research Center 
71 Franklin Road 

Hopkinton, MA 01748 


Dear Mr. Hassinger: 


Various researchers in our medical center are buying microprocessor 
systems to facilitate their data collection. We are currently 
searching for any cross-assemblers which will run on a PDP-8 or 
PpP-12 and assemble code for Z-80's, 8080's or 6800's. We would 
appreciate hearing from anyone who could help us procure such 
software. 


Sincerely, 


Sg bo bTy 


Roy A. Standing 
Programmer y~ 
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Harris Semiconductor 
M.S. 54-40 
PO Box 883 
Melbourne, Fl. 32901 


NOTES FROM MICRO-8 WORKING GROUP 
By Jonathan Lockwood Phone: (305) 724-7542 


FALL-78 SYMPOSIUM 


This year's symposium is expected to be a good one for microprocessor users. 
There are four application papers and one poster paper planned that will pro- 
vide a foundation for discussion. There will also be a Hardware/Software 
Workshop for any mini-papers. The schedule for MICRO-8 applications on Monday 
Nov. 27th is as follows: 


DECstation-78 Product Panel 4:15 - 6:15 pm 
By Gary Cole of DEC 
Design of an Ocean Based Seismometer System 8:00 - 8:30 pm 


By Bob Moore of Scripps Institution of Oceanography 
An all CMOS, 16k word system based on the HM-6100 
which store hydrophone data on a 4 track digital 
cassette. Used for seismograhic research and explor- 
ation. 
The GDP-12 Geophysical Data Acquisition System 8:30 - 9:00 pm 
By Bob Staley of Zonge Engineering & Research Org. 
An all CMOS, battery operated, dual processor system 
used by the mining and oil industry. The 20k word sys- 
tem has interfaces for two high speed A/D converters. 
An all CMOS MICRO-8 Development System 9:00 - 9:30 pm 
By William Beals and Henry Smith of Criterion Logic Corp. 
A hardware development and debug system with a 40-pin 
in-circuit emulator that interfaces to a DECstation-78. 
Features include backtrace, memory overlay, hardware break 
point, and a trigger for a logic analyzer. 
PDP-8 Development System for a Bit Slice Microprocessor 9:30 - 10:00 pm 
By Doug Gluntz of Harris Govt. Electronic Systems Div. 
PDP-8/E used for source entry, linkage to a functional 
Simulator, and downloading to a hardware protyping sys- 
tem. Functional simulation done in CDL (Computer Design 
Language) on a UNIVAC 1108 computer. 
Hardware/Software Workshop 10:00 - ??? pm 
Forum for users to share ideas on various hardware/soft- 
ware hints, kluges, and maybe even solutions. Ten minute 
mini-papers accepted up to day of session; just call me 
for a time slot, no abstracts required. 


Data Acquisition System for Offshore Oil Rigs Poster Paper 
By John Kracik of interstate Electronics Corp. 
Bouy based system to monitor temperature, pressure, strain, 
and acceleration. Utilizes an RF link to communicate to 
oil rig. 
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SPRING-78 SYMPOSIUM 


The Spring-76 Symposium that was held in Chicago was quite succesful and inter- 
esting for the PDP-8 user. A summary of several RTS-& sessions was presented 
in the May newsletter (#28). A summary of some of the other sessions follows. 


0S/78-V2 

Ron Jansen presented an overview of the new Commercial Basic and Symbiont 
features for the DECstation-78. Commercial Basic is DEC's answer to the pro- 
liferation of business Basic packages for INTEL 8080 based systems. Some of 
the important features include: 

A better editor with more commands: now can change a string in line with- 
out retyping the whole line; automatic sequence generation of line num- 
bers (similar to feature in DIBOL). 

Full 8-bit ASC1l support, ie. can now use both upper and lower case as 
well as all the control chars to drive the VT-78 terminal. 

15 place string arithmetic that supports +, -, *, and / and which uses 
decimal arithmetic instead of binary arithmetic. 

PRINT USING statement that allow extremely versatile formatting of dis- 
played, printed, or stored (file) output. 1t provides for readable and 
customized printing of numbers and dollar amounts, especially in col- 
umns. I1t is similar to FORMAT statement in FORTRAN. 

Unit Record 1/0 that allows access to individual records within a file. A 
record may be any length up to 4093 characters and all records in the 
file must be the same length. 

Special commands to position the cursor on the VTI-75 terminal; used to 
generate a form entry package. 


Symbiont is the word used to describe a new, long overdue multi-tasking func- 
tion that allows OS/75 to run simultaneously with RTS-8 on a DECstation-75. 
this allows OS/76& to run concurrently with say a line printer spooling rou- 
tine. What DEC did was to set the software core size to 1zk words and then 
use the last field to run an RTS-8 task. 0OS/76& has been patched to allow 
running with interrupts on. The following convention is used: 


FIELD 0 
#0001 ; 
CLE 30 TMP -1 62 (FH) 
Me ee aon 
The one requirement of the Symbiont is that no DMA device load into page zero 
of Field zero. Since the DECstation-78 does not used DMA transfers this is 
not a problem. Several new CCL commands have been added to support this func- 
tion. 


OS/8 WORKSHOP 

Jim Mechtel, the new OS/& Project Leader, provided information concerning RLO1 
support, 128k word support, and gave some hints at future enhancements. The 
RLO1 is a new "5-megabyte" capacity, top loading cartridge disk drive. Since 
it is organized in 8-bit words, it looks like an overgrown, high speed floppy 
disk. By tne time OS/3 uses the "funny" 12-bit packing, the capacity has 
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Shrunk to 2.6 million 12-bit words. Because of directory size limitations, 
the disk is chopped up into three logical units as follows: 


RLOA: 4081 Blocks; 


RLEA Tracks 0 - 177; 
/RLBBD 16 blocks per track 
| RLOB: 4081 Blocks; 


Tracks 200 - 377 

16 blocks per track 
RLOC: 2025 Blocks; 

Tracks 1 - 377 

4 blocks per track 


You will need two seperate handlers, 2 pages each, to talk to these devices. 
The handlers will read/write 1-3245 pages per call. 


According to Jim there will be limited 128k word support in the next release 
of OS/S&. Gnly the following was promised: PAL8 will write a 125k pgm; ABSLDR 
will load all 128k words; and SAVE, GET, RUN, and ODT will support 128k words. 
The following limitations WILL REMAIN: CUSP's like P1P will work only with 
32K; USR calls also limited to 32K; and FORTRAN I1, FORTRAN IV, and BASIC will 
not support 128k words. 


Looking toward the future, Jim said that they are considering putting the 
Symbiont features on PDP-8/A's. Also, they are looking at some SORT/MERGE 
packages and other user generated programs like the enhanced version of DIkKECT. 
However, no definite promises were made as to when these features might happen. 
lf you have any specific features that you would like added you can write to: 

The PDP-8 Suggestion Box 

Digital Equiptment Corp. 

PK3-1/M34 

Maynard, Ma. 01754 


DECSTATION-78 

During the session on the DEUstation-78, Gary Cole mentioned that currently 
there are about 150 OEMs selling various configurations that range from low 
end minicomputers to full blown business systems. He said that Word Process- 
ing usuage is three times larger this year than last. For users needing com- 
munications, he mentioned that a MODEM made by Racal-Vadic (Sunnyvale, Ca.) 
would accept an escape sequence to automatically dial a phone number. (Hum, 
that would be easy with the new Commercial Basic software, J.L.) 


MICRO-12 
A new, all CMOS, single board computer system - The MICRO-12 (HB-61000) - was 
described by Bill Bennett of Harris Semiconductor. This product is similar 


only in size and concept to the intercept Jr. that is made by Intersil. A pre- 
programed ROM in Control Panel provides: a system monitor, keyboard and dis- 
play utilities, and system diagnostic capabilities. The MICRO-12 includes an 
8 digit LED display and 16 key keyboard which allows direct progam insertion, 
execution, and examination. 


The system monitor aliows the user to enter his program either manually through 


the keyboard or a TITY, or automatically from a Kansas City Standard tape cas- 
sette (300 Baud) or a bDECstation-78 (9600 Baud) using the Binary Loader fea- 
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ture. The system monitor also provides the user with four (4) independent 
breakpoints for program debug. A 64 X 12 RAM for Control Panel page zero is 
used so that the monitor does not need any of the user program memory. 


A special function key allows the user program to be listed in octal on either 
an external TTY or CRT. Another special function key allows the user to punch 
a program tape on either a TTY or a cassette. 


The MICRO-12 can: be used as an evaluation board when you are trying to learn 
about the 6100 microprocessor. It can also be used as a system board for low 
volumne applications. The board can be configured with up to 1k words of 
memory, a serial interface (either RS-232 or 20mA current loop), and 12 bit 
parallel interface. In addition there is a large wire-wrap area for custom 
1/0 requirements. A dual 22-pin connector lets you connect the MICRO-12 to 
your system and to support boards like a 4k RAM board (available late Oct.) 


For more information on this system, such as how to order one, call either me 
or your local Harris rep. 


DWARE/SOFT E RKSHOP 

Earl Ellis presented the first three papers at the Hardware/Software workshop. 
His first paper described a system that used a 12k word PCM-1le2 and a TV camera 
to measure the speed of a Coast Guard lcebreaker. The system used a Colorado 
Video Instruments compressor to interface the TV camera with the PCM-12. The 
compressed raster was then processed and the ship's speed displayed on a 3 
digit BCD display. The speed could also be printed on a TI-743 terminal. The 
operating system was U/W-FOCAL (V3S). 


Earl's second paper described two Scientific Information Processing Systems 
(SIPS - large pdp-8/e systems). The first system is primarily intended to be 
a real-time multi-purpose minicomputer system. It is used to develop software 
for microprocessor based instrument processors, to generate report quality 
graphs, to provide media and code conversions, and to provide real-time data 
collection. The 32k word system supports dual dectape, 3 RKO5 cartridge disk 
drives, dual floppy disk drives, a 9 track 800 BPl tape drive, and various 
other peripherals. Quite a variety of languages are used on this system in- 
cluding ALGOL-60. The second system is primarily intended for the collection 
and analysis of oil and hazardous chemical information. It is the system that 
is used to determine the source of oil spills around the country. The primary 
operating system is a time share system called ETOS. 


A Spectrofluorometer was the topic of Earl's last paper. This instrument per- 
forms the actual analysis of the oil. It is connected to a 4k PCM-12 system 
via an A/D converter. The complete system is then connected to the SIPS II 
via a 20ma current loop (see newsletter #27 pgs 45 - 46.) The language used 
for this configuration is FOCAL-69, which Earl says is the best one for 4k sys- 
tems. The PCM-12 boots to Field 7, location 7777 and then transfers the pro- 
gram to Field 0. During periods of change Field 7 is CMOS RAM with battery 
backup, later the program will be blown into PROMS. (This is similar to using 
the Electronic Program Injection module on the DECstation-76, J.L.) 
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ve For more information on these papers or if you like to talk about FOCAL, con- 
tact: 
MSTC Earl T. Ellis Jr. (Phone: (203)-445-8501 Ext. 296] 
USCG Research & Development Center 
Avery Point 
Groton, Conn. 06340 


During the next session Kichard Karhuse described an 8 bit handler for OS/8. 
Normally OS/& writes 96 bytes out of 125 bytes per sector and uses 4 sectors 
per OS/& Block, thus wasting 30% of the diskette. With his handler, which has 
both drives co-residenent with SYS:, he writes the full 128 bytes and uses 
only 3 sectors per US/& Block. He also described how to add Write Protect to 
an RX01 drive. Since the electonics already exist in the drive, all he needed 
to add was a lighted toggle switch and a LED inteceptor for the ASCII standard 
write protect hole (not on DEC diskettes, J.L.) Finally, he mentioned that 
the layout for the timing capacitor for a one-shot on the M1705 Dual Output 
module can cause false triggering of the one-shot. For more information on 
these topics contact: 

Richard A. Karhuse [Phone: (312)-492-5248] 

Northwestern University 

Computer Sciences Lab 

TECH B626 

2145 Sheridan Road 

Evanston, Il. 60201 
Footnote: There was a very interesting field trip to Northwestern during the 

A™Symposium. They have a PDP-&/E that the provides management of various disks 

and tape drives for a laboratory computer network. This network utilizes a 
high speed (56k Baud) serial data link to talk to other PDP-8's, some micro- 
processor development systems, and to a CDC 6600. It is a worthwhile side 
trip whenever you happen to be going to Chicago. 


A mini paper about OMNILINK, a DMA processor link for OMNIBUS devices, was 
presented by Ernst Lopes. This interface allows high speed transfers (150k 
words per second) between to PDP-8's which may be separated by several hundred 
meters. The transfers occur on a cable consisting of 16 twisted pairs. ‘The 
device is implemented on Quad wirewrap board. For more information contact: 

Earnst Lopes Cardozo [Phone: 030-882221] 

European 12-Bit SIG Steering Comm. 

Vondellaan 24 

Utrecht, Holland 
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PDP-8 MANUALS 


There are a variety of software manuals that exist for the PDP-8 user. There 
have been several updates made to these manuals which you may not be aware of, 
especially concerning the OS/8 Handbook. These manuals can be purchased sep- 
arately and used to evaluate new features before you purchase new software. 
They may be ordered either through your local sales office or directly from 
the Tecnical Documentation Center serving your region. The order numbers 
below were obtained from the Technical Documentation Catalog Spring 1975 (EA 
09342 86/78 030 3805.) 


The OS/& Handbook has been revised steadily since it was printed in 1974 and 
needs to be rewritten now. The most complete and well formated documentation 
can be found in the OS/78 User's Manual which comes with the DECstation-78. 
This contains information about the latest OS/& revision, ie. V3-D, and some 
information that was formerly in the OS/8 Software Support Manual. However, 
since OS/78 is a subset of OS/8, it does not list all the feature of OS/8- 
V3/D. The order numbers for these and other OS/& related manuals follow: 


NAME ORDER NUMBER 
OS/8 Handbook AA-4637A-TA 
OS/8 Handbook Update AD-4637A-T5 
OS/8 V3D Release Notes AA-4645B-TA 
OS/8 V3C Software Support Manual AA-46464-TA 
OS/76 User's Manual AA-5745A-TA 
OS/78 Command Summary AV-5562A-TA 
US/8 F4 Software Support Manual AA-4532A-TA 
OS/8 Macrel/Linker User's Guide AA-5664A-TC 
OS/6 Macrel/Linker Kelease Notes AK-5603A-TC 
RTS/S& User's Manual AA-0724C-TA 
R1S/8 Release Notes AA-5155A-BA 
RTS/& DECNET/8 User's Guide AA-5164A-TA 
RTS/& DECNET/8 Release Notes AA-5747A-TA 
PDP-& Programing Manual AA-0586A-TA 
PDP-8 Pocket Reference Guide EH-01805-77 
PDP-8 Family Commonly Used Utility Routines AA-4338A-TA 
PAL & Assembler Document AA-0615A-TA 
FOCAL-8 Document AA-0627A-TA 
FURTRAN/SABR Document AA-0632A-TA 


MICRO-8 COMPUTERS 


I have recived information about another Micro-Computer system based on the 
6100 microprocessor, this time from Europe. This 32k word system has several 
interesting interface cards available including: 
Floppy disk controller for either DSD 310 drives or Shugart SA400 mini 
drives. 
IELE 488 Instrument Interface bus; either a software driven version or a 
hardware driven version. 
512 X & Video KAM including modulator for VHF. 
A/D multiplexed subsysten. 
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The system uses an advanced control panel, completely implemented in software 
to perform all the required utilities necessary for efficient software develop- 
ment/ debugging. The control panel software allows for: 
Loading, inspection, and modification of binary programs 
Start, suspension either by hardware or software and continuation of pro- 
grams. 
Trace functions giving all information on actual progam execution. 


Several ROM based application modules are available including: 
A 1k word floating point package providing add, subtract, multiply, and 
division. Also converting and formating for display. 
A 1k word Real-Time Monitor for parallel processes and utilities for inter- 
active communications. 


For turther information contact: 
J. Molgaard or Chris Bagge Telephone: (02) 86 77 22 
ELEKTRONIKCENTRALEN 
Venlighedsvej 4 
DK 2970 Horsholm 
Denmark 


SHORT NOTES 


In the last newsletter (#29 page 14) Michael Mazzoni "discovered" that system 
CUSP's could not be called via the .RUN command under OS/78. This is easily 
solved by the following CCL command: .SET SYS OS& and restored by the CCL 
command: .SET SYS OS78. For more information on this and other SET commands 
see Appendix J of the OS/& HANDBOOK UPDATE. 


Also from the last newsletter (page 17), Dave Kocsis mentioned that Intersil 
was looking for computer programers. well Harris is also looking for some 
PDP-8 computer programers. lf you are a professor at some college, then you 
could suggest to your students that they look at some of the companies that 
are using the 6100 microprocessor for posible job opportunities. 


Harris Semiconductor has just finished a 200 page Systems Design Manual for 
the HM-6100 microprocessor. This manual covers techniques for hardware inter- 
facing of a variety of systems from the bare bones, minimum controller to a 
full blown 32k word computer. For more information on how to purchase this 
and other manuals just call me or your local Harris rep. 
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19 August 1978 (617) 742-3140 


In the May newsletter I described our continuing effortto patch 
OS/8 for a console device code of 40/41. Since then, I have received a 
deluge of letters (three) on the general theme of "do it in hardware, cummy! 

These notes all refer to PDP-12's, but are quite likely applicable to 
PDP-€I's. 

Fred Brandt has noted (Newsletter 29:12) a solution by Dave Talkin, 
which modifies the existing teletype interface. The final result is a single 
interface, with device code 03/04, with output switchable between (1) 300 
baud, current loop and (2) 1200 baud, RS232. 

Joe Madden sent me full details, including a wirelist, which I apvend. 

In the normal configuration, 03/04 controls a 110-baud, current-loop teletype, 
and 40/41 controls a 1200-baud, RS232 video terminal. In the switched 
configuration, 03/04 is the terminal ard 40/41 is the teletype. Te switch 
configurations requires changing four jumpers and swapping two cables that 
plug into the backplane, so it is inconvenient inua situatior «were frequent 
switching must be done by nontechnical people. His solution has the very 
great virtue, however, that the "normal" configuration is absolutely identical 
to that supplied by DEC. 

Dwight Smith describes a modification designed by Bruce Robins of 
DEC Field Service in Maine (207 797-9220), which 1) changes the DP12 device je 
codes from 40/41 to 43/44, 2) installs a DPDT switch on the frame of the oe 
backplane, wired to 3) swap bit 6 of the TTY and DP12 device codes, thus: 


" 


Jung DP12 
normal. 03/04 43/44 
switched 43/44 03/04 


"The total bill for the hardware modifications was under $1C0," according 

to Dwight Smith. We are going to have this modification made on our -12, 

and our field service reps have been talking to Maine, but all they will 
promise is to do it on an hourly-rate basis; they estimate it will cost $250. 
I'll note the eventual outcome. This is the most convenient solution for us, 
and note that it is the only one of the three which works if it is necessary 
to output properly to a teletype which requires two stop bits and to input 
block transfers from a terminal which generates only one stop bit. However, 
it produces aron-standard configuration and could conceivably cause trouble 
someday if we ever wanted to install a PTO8... 


A UWF/v4 trick: . . 
~ Now that we have within-group group-independent addressing (via “group C )» 


you and I and everybody else want group MOVE's. While we're waiting for Jim 
van Zee to figure out a clever way to implement this in less than one more 
word, here's a way to pass the time. 

UWF detects the entry of an indirect line as a line starting with a 
digit. However, the Line number is evaluated in the normal way, and can be 
any general expression, so long as it begins with a digit. I write my wae 
Subroutines as single groups, using exclusively group-zero addressing. 

Let's say it's group 9. I output the group as a .DA file (O O SUB;W 9;0 C). 
I then edit the file to change all the line numbers from 9.XX to 0.XX+#. 

I have a (sorry, MOBY MUNGERS) FOCAL program to do this automatically. To 
insert this into a new program as, say, group 18, I just SET #-18;0 I SUB 


Switchable Asynchronous Ports #39 ~ PAGE 17 


The PDP-12 has a pre-wired Dataphone interface that uses device codes 
40, 41. 


Unlike the console teletype, the Dataphone port allows a choice of baud 
rates by crystal and/or jumper selection. 


In order to switch the clocks such that the 1200 baud Ann Arbor terminal 
can be used as the console device, the following modification has been 


installed: 

Delete Add 
N25El - N1IJ1 N25El - N11J1 
N25El1 - N12P2 
N10P2 - NIIEI] N10OP2 — NII1E1 


N12V2 - NIIE1 
NO8J2 — NOSP2 
NO8K2 - N1ID1 


To switch ports such that the console device codes 03, 04 control the 
E1A RS232 1200 baud terminal and device codes 40, 41 control the tele- 
type, install four jumpers as shown below. Change the corresponding 
cable connections to the backplane. 


To restore the original configuration, change the jumpers and the cables. 


N11 Normal Switched 
D1 NO8K2 N12V2 
El N12vV2 NO8K2 
H1 NO8J2 N12P2 
Jil N12P2 NO8J2 

Cables 

Console N2 N3 

Remote N3 N2 


Above is from Joseph A. Madden, Veterans’ Administration Hospital, 
12000 North 30th Street, Tampa, Florida 33612; (813) 971-4500 x 301. 


Notes: (by DPBS) The effect of the modification is to provide a 
sumper-Switchable interchange Qf the baud rates of the two interfaces. 
As supplied by DEC, the teletype interface is 110 baud, RC~controlled, 
and the DP1? is customer-selected, (1200 baud in Joe Madden's case), 


crystal-controlled. . 
Tre DP12R is normally supplied with a BCO1A-25 cable assembly, with an 
hS232 connector on one end anc a PC board on the other; the teletype 
cable terminates in a PC board. The slots on the teletype and DP12BR 
interfaces are functionally ecuivalent, according to Joe, the necessary 
level conversions, etc. being done on the PC boards. So it is possible 
to simply switch the cables, and all that pete eae ier Nai 
baud rates. (Note, however, the stop bi question--as 
oa both TTY and DPi2 send/receive 2 stop bits, which is CK for most 
applications. If the DPl2 has been modified for 1 stop bit, presumably 
it will not operate the TTY properly even if the baud rate is correct). 
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GALLAUDET COLLEGE 


KENDALL GREEN, WASHINGTON, O.C. 20002 


SENSORY COMMUNICATION 
RESEARCH LABORATORY 
HEARING AND SPEECH CENTER 


August 2,1978 


Mr. Bon Hassinger 

12 bit Sig Coordinator 

Liberty Mutual Research Center 
71 Frankland Road 

Hopington, Massachusetts 01748 


Dear Bob and Fellow decus Members: 


In the May 1978 issue (#28) on page 39, there is a letter from 
Dan Smith reguarding OS/8 and device codes. We had a similar problem 
and here is how we (@avid Talkin and myself) solved the problem. 


If you take a look at the PDP-12 prints you will indeed see 
that the TTY interface and the DB-12-B are in fact similar. The primary 
difference being as Dan noted the device codes (03 & 04 for TTY and 
40 & 41 for the Dataphone). You will also see that the speed for the 
TTY is set by a RC clock (M 452). The speed for the Dataphone is set 
by crystal clock (M405 in slot N 11). Also the Dataphone requires a 
BCOI1A cable. It is this cable that does the level conversion from RS232 
to the TTL level required by the M706 & M707). A note on the prints for 
the DAtaphone states that the clock rate must be 128 times the Baud rate 
for speeds up to 10000 Baud.Apparently speeds are available up to 
100,000 baud with a slight additional change. 


From this it can be seen that to change the console terminal to 
something other than a tty at 110 Baud all one has to do is change the 
clock speed if going to 300 Baud or plug ina new clock card and the 
BCO1A cable for the RS232. 

On our PDP-12 we installed a switch so that we could use the 
Decwriter at 300 Baud or a CRT in an adjucent office at 1200 Baud. 


There has been over the past year or so ocassional references to 
the Bat Handler and how to use it in the OS/8 system. We use Fortran IV 
for signal generation and data analysis on both oyfPDP8 and 12 systems 
as well as the Dec System 10 at the computer center. On the 10 system 
it is possible to have the batch processor intercept all input and 
output to you TTY. Unfortnately the Batch processor for the OS/8 
system is not as intellignet. But by use of the Bat handler you can 
read in data from the batch stream. The one necessary piece of inform- 
ation not given in an obvious place is how to terminate the data input 
to the batch handler. I submitted an SPR on this and received a call 
from the Maintainer. He had checked various things including the coding 
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and found that the data stream needs to be terminated by a '$'. This is 
shown in the code for the batch handler but nowhere in the documentation 
for batch itself. It is mentioned in a section called Advanced Features 

in MS BAtch. There is for MS Batch a fourth type of instruction 'SEOD' or 
I assume 'End Of Data’. This bears out my experience with the Bat handler. 
I found that if there was nothing past the data except the 'SEOF' then all 
seemed well. If however there were additional commands following the data 
the results were unpredictable. The enclosed TTY printout will illustrate 
the use of the Bat Handler ina Fortran IV. system. 


The restriction that there must be an extra 4 K of memory still holds. 
Our systems are all 32K. I have a special version(Frts without the patch to 
run in 32 K) of FRTS to be used with the Bat handler. Batch has been patched 
to run in the full 32k while FRTS only knows about 28K. 


This could be a problem for people with less than 32K. I tried to use 


the version of FRTS set up to 32K and then the first command after begining 


the job to lower the core size. This does not work! Maybe some day these 
restrictions will be removed. 


Sincerely, 


~ 
(eae 
Fred D. Brandt 


THE FOLLOWING IS THE LISTING OF THE JOR SUBMITTED TO THE BATCH STREAM. «-« 
THE “BAT’ HANDLER WILL READ THE DATA FROM THE BATCH JOB BUT NOT TYPE 
TT OUT INTO THE LOG. 
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$JOR TEST FORTRAN 4 RATCH READING 
.COM F4TST.y TTY SSF 4TST FT 
»LOAL F4TST.RL. 

vROFRTS1 

KF ATST 

KEATI/ 36 

23 

| 34 

4% 

SA 

$ 

RES 

» MEM 

SENT JOR 


«SU FATST. BI 


$JOR TEST FORTRAN 4 BATCH READING 


COM FATST. 9 TTYL 47ST ET 


FORTRAN IV 4BAAK Fe AUG 783 RAGE ONE 
C FORTRAN IV TEST B= 2-75 
C 
0002 READ (8¥1000A 
0003 READ ¢€8¥100)B 
Q004 READ €89100)C 
0003 REALTY (8»100)T 
0006 100) FORMAT ¢16) 
0007 WRITE (491905 Avy BeCol 
0010 103 FORMAT(C’ A= “’yTbe% B= “yTéy’ Ge “yT&s’ tis “9 TS) 
Ooo11 STOF 
0012 ENT 


LOAD FATST-RI 
“KR FRTSI 


KF4ATST 

KBAT 3/84 

Ass od Re 34 C= 4S [ts Tw) 
*RES 


SYSrDTSKyKKRROyRRAL y RKBL»NULL 2 TAO s LET» DUM y BAT sy TTY 


«MEM 
32K MEMORY ! 
SEND JOR 
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NOTE FROM BILL HAYGOOD ON MULTI-USER 0S/8 


I would like to let the 12-bit community know of the completion (at long 
last!) of the MULTOS-8 project (Multi-user 0S/8). It took quite a while 
longer to set out from under the Postal Service CAI project than I had 
anticipated. But MULTOS-8 is now uP and running and ready for delivery. 
MULTOS-8 presently supports the following hardware: 


* 16 - 32K memory (with 20K minimum recommended ) 
Each user has a virtual 32K memory regardless of physical amount 
of memory. 
* PDP-8/Asexf sm 
PDP-8/I (code not completely debugged for 8/1) 
* Up to 4 TTYs/terminals/CRTs each with own apparent copy of 0S/8, 
peripherals» etc. 
* KE8E EAE (supports both 8/e and 8/I type EAEs) 
* RK8E RKO5S disk drive O used as swapping and SYS disk 
* Up to 3 additional RKOS disk drives (CRKA1-3 and RKB1-3) 
* PC8E Paper Tape Reader and/or Punch 
* RXO1 Dual Drive Floppy in both 12-bit (RXAO-1) and 8-bit (RO-1) 
modes (handlers for both modes included) 
* Up to 8 TM8E Magtape transports 
* Up to 6 TD8e DECtape transports (Yes; TD8E -- no hardware mods) 
* Real Time clocks: DK8EAs DK8EC, DK8EP and PDP-8/A DKC8AA 
* Any Line Printer using device code 66 


Other features include: 


* A Print Spooler which can be called with a keyboard command or 
under program control. Up to 32 files of any length can be 
spooled. As soon as the command is issued» control returns to 
the 0S/8 Monitor so that other processing may be done while the 
printer is outputting the desired files. 

* Full Batch processing from any and/or terminals. 

* Automatic device assignment/de-assignment. 

* Files can be transferred between terminals and/or any devices on 

the system. 

* Separate passwords for each terminal may be used, if desired 
(nice for modem applications). 

* Surprisingly low priced. 


Future enhancements include support for 8 TCO8 DECtape transports, RLOL 
disk and KL8A terminal interface. 


For more informations please call or write me at 801-942-2300, ComServ 
(Computer Services) Enterprises» 7822 Oakledge Road» Salt Lake City, UT 


84121 USA. 
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NORTHWESTERN UNIVERSITY 


EVANSTON, ILLINOIS 60201 


DEPARTMENT OF ELECTRICAL ENGINEERING THE TECHNOLOGICAL INSTITUTE 
AND COMPUTER SCIENCE 


August 14, 1978 


Mr. Robert Hassinger 
Co-ordinator, 12 bit Sig 
Liberty Mutual Research Center 
71 Frankland Road 


Hopkinton, MA 01748 


Dear Bob, 


As a frequent RTS/8 user-programmer, I would like to 
make some responses to Lee Nichols letter in the July '78 
Newsletter (Number 29, pages 2-5). 


First, let me thank Lee for taking the time to hhlp 
improve RTS/8. He was an excellent choice for the head of 
th | RTS/8 working group. 


Second, I would like to make one big suggestion to 
anyone interested in changes to RTS/8. This is "Look at 
RSX-11". RSX-11 is a real-tine, multi-tasking system for the 
PDP 11. It is probably thh closest thing to RTS/1l. RT=1144 
the other PDP 11 svwstem, is real-time, but not truly 
multi-tasking. Thus, many of the problems we are 
encountering with changing RTS/& have been seen by the 
developers of RSX-11l. I will grant that RSX-1l1l is nore 
sophisticated than we may want RTS/8 to be, but many of their 
features can solve our problems. 


The main reason for an executive in a real tine systen 
is to provide services which are inherent in the hardware, 
but because of multiprogramnmins, and real tii:e constraints, 
must be disbursed on a controlled basis. An obvious exanple 
of this is I/O. However, most executives also augment these 
"hardware" services. It is tm augmentation which we discuss 
here. 


For example, there is nothing inherent in the hardware 
about getting a command line. However, almost every task 
must do it, so RSX provides an executive call to retrieve a 
command line which has been entered to MCR. Thus, tost RSX 
tasks are entered via the MCR command: 
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nam ...command line... 


where “nam is the task name. MCE automatically does a BUN 
nam’. The task then issues ar exec request to fetch the 
command line, and processes it. By convention, anv task 
entered in this way terminates after processine the single 
comrand line. If multivole command lines are to te entered, 
the task is invoked with the MCR command: 


nam 


again, where “nam is the task name. MCR merely does a ‘RUN 
nam, and the task comes ud. It does a set command line’, 
finds none, so prompts for one and continues promptine for 
one urtil the user svecifically exits the task (ty entering 


CTRL/Z). There is a certain logical consistency here. In 
the first case, the user is requesting the task to do a 
specific function. It does it and exits. In the second 


case, the user is requesting the task, but not svecifvir, the 
function. Thus the task assumes that there is more tran one 
function te te done. 


Another thirg which I can’t stress enough is “USE 
MACPRCS . We have a nice macro assembler now and makine 
common code macros is so nice. This way your code is not 
scattered with 


CAL 
SENDW 
TTY 
TPMSG 


but instead 
SEND. W Ty Pio 


Not only is this easier to read, but it avoids the protlers 
with future changes in the format of executive requests. Yeu 
just change the PTS/8 macro library, and everyone has made 
the change. The advantage of this method is that those poor 
souls whe cannot use macros (tecause of limitei svace on 
assembly) can continue to write it all out. The real 
solution would be to have MACFEL use secondary storage (e.5s. 
disk) for extended symbcl and macro table storage if there 
isn’t enough core. MACRO-11 does this. Stan Rabinowitz, are 
you listening?? | 


RS¥-11 also provides informational directives. These 
allow a task to ottain information atcut its enviornment, 
including ‘task parameters (name, numter, priority, etc.), 
“partition parameters (partition name, length, etc.). These 
are uct immediately useful in 2175/8, since tasks usually know 
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these things. However one directive which woul¢e te useful is 
get time varameters . This returns the date ard time in an 
& werd huffer. 


Something which the TECnet authors found lacking in 
RTS/S are AST’s. For reasons I dor’t understand, they 
implemente? them directly in NSP rather than in 3TS/@. 


An AST (Asynchronous System Tran) is a task interrunt 
intiated ty the executive to allow servicing of contingencies 
including signalling everts, such as the completion of a 
orevious I/90 request. The executive keevs track of all 
AST’s, queues them (FIFO), and is aware when a task is 
servicing an AST. Uvon eviting an ASi service routine (which 
is similar to an interrupt service routire in structure), 
control is returned to one of three places. 


1. Another (queued) AST; 
<. The task, or 


2. Another task (e.g., the correstonding task was in 
a wait or suspend state prior to the execution of 
the AST). 


Sore exarples of AST’s include: 


RECIEVE MESSAGE AST which is invoxed when a messagve 
is queued for the task. 


POWER ERECCYESVY AST which is invoked during the 
power recoveryv vrocedure. 


I/O COMPLETION AST which is invoked uvon comvletion 
of an I/O request. 


MARK TIM® AST which is invoked upon comvletion of a 
mark tire request. 


Two directives, T[ISABL= AST RECOGNITION and ENABLE AST 
RECCGNITICN, allow AST’S to be queued during critical 
sections cf code that access data tases that are alse 
accessei bv AST service routines. If AST’s occur while AST 
recognition is disatled, trey are queued and processed when 
AST recognition is enabled. 


A method cf waiting for the logical “OF” of event flags 
rust te troviied. The method described in the FTS/8 User 
Manual is cruie at best. RS¥Y vorovides a directive which does 
this. 


As for an RITS/® User Command Language (UCL), the method 
of invekinge tasks described above is often enough for 
experienced users. However, for those times when it isn’t, 
MCR should have a user interface. This vrobably shouldnt be 
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done dynamically at run-time via messages. Few applications 
require such flexibility. Instead, the command language 
should the fully defined at assembly time. There should te a 

‘User Command Table , which would be a global symbol, thus 
any tasks can access it via .EXTERNAL. The table will be 
fully defined in the PARAM file. I can’t think of any way of 
ircluding code in tasks to create this table. How could we 
keep track of the next free table entry?M@ L.MAR +5 


Since the language must te totally general (from MCR’s 
point of view), it is difficult to have MC& (or USERCD) do 
much tesides invoke a task and pass the command line to it. 
dowever, some initial ovarsing could be done by MCh, 
particularly if we define our language rather well. The user 
would define each argument to the command, whether it is 
ovtional or required, and what type of argument it is. The 
types would include octal number, decimal numter, memory 
location, task name, and character string. In the first four 
cases, MCR could do conversion and print errors (perhaps more 
descriptive than BAD NUMBER ), thus providing a high level 
parser fer the user tasks. This parsing is both modular and 
will save svace, since only one copy of each conversion 
routine is needed (in the high level parser), rather than a 
seperate cody in each task. The character string type is a 

catch-all , which prevents MCR from parsing this arg -- it 
is vassed directly to the user task. 


The entire command table would be constructed using 
macros, of course. The macro C’D would start a command tatle 
entry. It defines the commard, possibly including required 
and ovtional characters, the task to be unblocked, and which 
task status bits should be unblocked. The command arguments 
are defined by successive calls to ARG, which defines each 
argument, types it, classifies it as optional or required, 
and specifies a user buffer to contain the parsed argument. 
Finally, a call to ENDE ends this table entry. 


Thus, a samole command table entry would be coded as: 


CMD DUMP,DMP,RUNWT 
ARG TSKNAM,OPT,DMPNUM 
ARG MEMLOC,REO,DMFST 
ARG OCTNUM,OPT,DMPLEN 
UNDE 


This defines a command, DUMP’, which will cause the 
task UMP to be removed from RUN wait. The command has three 
arguments. The first is a task name or number (TSKNAM) which 
is optional (OPT) and the parser will place the task number 
in DMPNUM. The second arg is a memory location, which is 
required. The parser will create a two word tlock at DMPST 
which contains a CDF to the field svecified as the first 
word, ard the absolute memory location as the second word. 
The third argument is an octal number (OCTNUM), which is 
optional. If it is present, it will be converted and placed 
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Mike Kelly 


at DMPLEN. The ENTE call will end the entry (nominally vlace 
a zero in the table). 


I would be interested in reaction to this provosal. 


Sincerely yours, 


Neckar Q \d 


Michael J. Kelly 
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The Computer Sciences Research Laboratory of 
Northwestern University vurchased one of the first DBC RID1L 
dual floppy disz drives. Shortly after the warranty pericd 
erviréed, so did the flovpy disks. DsC in their infinite 
wisdom wanted a flat $249.2@@ + travel + ete. to fix it. Fhe 
laboratory feit this to se exorbvitant and typically nas done 
all of its own maintenance in-house. Tan the process of 
diagnosing the disk drive, we uncovered what avdeared to be 2 
drive write-protection circuitry. : 

Installing write orotection into the the RXZ1 flops 
disk drive turn out to be simple. TBC has included all th 
necessary logic and microvrogramming for it, tut documents it 
nowhere, except marginally in the orints. DEC has drought 
all the necessary signals out to a Berg-type connector. It 
abpears D©C had tlansed on using a flovoy drive whicn would 
sense a hole in the corner of the floppy diskette. This is 
the way [3M defines write protect on floppy disks much lixe 
the tab on cassettes. Apdarently the drives that Digital is 
using does not have this cavability (although we have never 
verified this face). 


x 
= 


To write orotect flovvies on the 2221, 211 that is 
needed is a switch, a little cable, and a Berz2 connector. 
Power is ovrovided on the connector if a lighted switch is 
desired. In this case an additional resistor must ode added 
to the driver board so that sufficient current is supolied to 
light the lame. 


When the switch is closed (see circuit diagram), 
DRY ¥ET PROT is generated. The microcontroller senses this 
Signal whenever awrite operation is issued by the host 
computer, for a given drive (8 or 1). If the drive is 
protected, the controller aborts the oteration and sets th 
done, and error flags. The EXES is set to a value of 413 
(octal) and the PRROR register has a value of 2128 (octal). 
4ll system software tested (08/8, RTS-9 RT-11) did zero or 
more retries and then terminated the overation unsucessfully. 


Installation dints 

The simpiliest way to write ovrotect a floppy disk is 
to install a jumper or switch dDetween vias #1 and #3 on the 
apprepriats Berg ovins of the “7727 drive electronics board. 
Any sort of toggle switch will do. We opted for a mors 
esthetically oleasing back-illuminated, DdDush-button switch. 
In addition to jumpering the above two dins. a six volt lamod 
and switch is placed between dins #€ and #& to indicated when 
the drive is write orotected. To obdtain ‘the half ampere 
needed to drive the lamo a 12 chm resistor was tacked on topo 
of 2128 {for drive @) or Rill (for drive 1). 


The labeling “WRITZ PROTECT was obtained rather 
ingeniously. First, the logo was generated with 18 dt. 
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Tub-on letters to a piece of Vander. This art-work was 
reduced several times with a Zercex machine until the correct 
size was odtained. The logo was then trans?ered to clear 
Dlastic %y using 2 Thermce-72x machine—the device used %9 


create cverhead tranvarencies. The olastic logo was then 
mounted to the button using Scotch PHOTO MOUNT Sovray Adhesive 
(cat. no. #994). The vlastic is cut to ‘the size of the 
button. 


The switches are then mounted on the FICL face diate. 
This plate is heavy cast aluminium. Thus a drill oress 
smould de used to sunch the Roles. Masking tave skould te 
place on the outside of the face dlate to orevent marring and 
the nole snould be vdunched from the vackside. The tole 
should be located such that the backside of the switch is 


just atove the back retention olate. 


Conclusion 


The write orotect switches have teen use in the 
laboratory for over six months with no problams and orevented 
some g00d ?lovdDiss From being accidentaly creamed. [If there 
is sufficient (but not cverwhelming) demand, the laboratory 
could provide the write protect switches tuilt and tested for 
a nominal charge for installations which do not nave the 


svecialized equivment nor oversonnel to duild the switches. 
These users would still have bunch the holes in the aluminium 
and install the switches. 


Te concludes with a continuation on the history of our 
drive, we have developed 2a RBY¥J1 micro-controller diagnostic. 
This diagnostic allows us to single step the 3X21 controller 
and examine varions internal signals. More importantlr, it 
allows us to  dumo the micro-controller ROM’s. This dumd 
then can be compared (via source compdare orograms) with a 
z00d ‘loppy’s ROM to determine which location if any have 
changed--we have encountered several flovvies with this 
problem. In our casé@, an unused-dvit changed state and 
caused our RXZ1 to jump internally +%o0 non-existant memor;. 
we fixed our ovroblem with about $3.13 of wire by totally 
disabling this unused bit. 


The diagnostic will only be useful for installations 
wWnich extensively do their own maintenance. [ft requires 27 
bits of Darallel invut interfaces from tte micro-controllier 
to the diagnosing comeuter. M17@2’%s5 or DRii’s will suffice 
to bring this data in. However, a cadle {interface must de 
vbuilt om a flis-chipv module. The diagnostic is written in 
OS/& FORTRAN II with one SABE level subroutine to read the 
M1723. It should be fairly easy to transport this diagnostic 
to. ar PDP=11.< 


The diagnostic is not very well documented currently. 
But, I am willing to work with anyone who really wants to use 
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it. It goes without saying that any installation “who waats 


to use it must have some other mass starage device other than 
the floapies because vou cannot run tne diagnostic off a sick 
flopoy. Our laboratory currently sunverts: TDsSCtaves, LOS 
format S-track magtapes, 2438 disk packs, RX05 disk odacks, 
and paper tavde. : 


PARTS: List 


(ver drive) 


Lighted Push-Sutton Switch 
Push-on, bush-cf? 5 volt switch 
(Cutler-sSammer 5§312D8191-1 or equiv. 


available from Newark) 


Berg Yeader/Pins 
Header 65045-0335 2x4 header, 0.12 


spacing with four 47712 dins 


Cable 


Your conductor avvrorxr. 1 foot 


Resistor 
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SUMMER INSTITUTE OF LINGUISTICS, INC 


INTERNATIONAL LINGUISTICS CENTER © 7500 W. Camp Wisdom Road, Dallas, Texas 75211 © (214) 298-3331 


July 5, 1978 


Mr. Robert Hassinger 

c/o DECUS 

129 Parker Street, PK-3/E55 
Maynard, MA 01754 


Dear Mr. Hasstinger, 


Seeing the CPU Hints and Kinks published in the 12 bit #27 
encouraged me in include a change we made several years ago to our 
Straight-8 to overcome its inability to combine the Group 1 Operate 
Instruction INC and the vartous ROTATES. The problem is the set 
up time required by the DCD gates used for the rotates. By adding 
R302 delays in the various Rotate signals the gates can re-setup 
with the incremented value in the AC before the rotates. We used PF11 
and PF12,two slots that were originally wired for the A-D converter. 
Others may need to find a free space to add the two cards. Don't be 
tempted to just delay the PQPIsignal, the MB control bits change too 


soon for that. | hope this will be helpful to some of those who are 
still using the original 8's or someone who is thinking of buying 
one from the surplus market. CC 


We would appreciate it if you could send us a copy of. the back yr 
issues of 12 bit on microfiche if there are any left. 


We would be glad to duplicate paper tape copies of DIRECT V5 
if that is still a live option. !f not, how can we get a copy of the 
latest version? It sounds like something we'll need. 


Sincerely yours, 


Dick Bronson 
DB:ns 
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USCG Research & Development Center 
Avery Point, Groton, CT 06340 


Mr. C.J. Thompson 

Montreal Neurological Hospital and Institute 
McGill University 

3801 University Street 

Montreal, Canada H3A 2B4 


Dear Mr. Thompson, 
Single to Double Precision in a PDP-12 or PDP-8 


I have read your article in the ]2-Bit SIG Newsletter and am writing 
in responce to your letter which was printed on page 16 of SIG #29. I hope 
thet the code you show is not running, as a large fait is present, which other 
sections of your code may correct. fhe error is that the command SNL CLL will 
never clear the link. Yau have combined a Group I with a Group 2 Operate 
instruction. SNL CLL will be assembled by PAL8 into a 7520 (7420 is SNL, 7100 
is CLL; these are Inclusive ORed into the 7520). When the PDP8 executed the 


7520, It will decode it as a SMA SNL ~ and the LINK is still set....... ciara ets 
I had this problem and solved it as follows. It does not use any Group 

Two. It happens to be a little cleaner inthat it only uses 6 locations. 

TAD I 12 / number from data array 

TAD I 13 / add to low order word 

DCA I 14 / save results, overflow in the link 

RAL / Link to AC-11 and AC-0 to Link (CLI) 

TAD I 13 / add 0 or 1 to High order 

DCA I 14 / Finsihed, and Link = 0 for NEXT'TAD I 12' 


I had made the same error in a A/B Averager I developed for FOCAL. It uses the 
call FADC(€1,T1) , where Cl is the Channel, and Tl is the number of times to 
read it, defalt = 1. Since we use a 12--Bit unsigned A to D, overflow will 
occur. The program which calls FADC does the division, why duplicate code. 
This runs on a 6100 chip, and can convert. 1000 readings to double precision 

in less than .05 Sec, which is the time between ev-ats. When the event time 
gets much less than that, d@hag single to double this way is not effective, and 
a DMA (FPP-12) method has to be used. ; 


EMD. 


System Programer 


Copy to: 
Bob Hassinger, 12 bit SIG 
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Dear Bob, 


I have just read #29, and I would like to comment on the quanity of RX01 
handlers which use over 600 blocks. I have used Mr. Dewar's RX handler for 
non-systems and gets 650 OS/8 blocks from two devices. I have also used the 
DSD RX handler which gets 658 blocks on only one device. Dr. Lynch of Xerox 
has submitted a handler to DECUS which gets 666 blocks. 


As a member of the Software Exchange Committee, I would like to see DEC 
adopt one of these (or write their own) so that users can take advantage of 
the increased storage from the RX01l. I understand that soon????? DEC will of- 
fer the RX02 with increased density. This will not eliminate the problem. 

I have tried to read a Dewar's RX with the DSD handler and the reverse. To 
date these have not been successful. 


I would also like to comment on some Interrupt Code which we recently 

"found' in DEC literature. When using the KL8 type interface, the instruction 
"KIE" (6035) can be used to enable/disable interrupts from the interface. 
(the KL8-E is enabled by the CAF instruction’) The need to didable interrupts 
can accur when more than one KL8 is being used (two or more serial devices) or 
if you want to service the Clock, and disable the TTY for a while, an easy way 
to ignore Control-C. FOCAL, INBASIC, F-IV,and RTS-8 are all examples. 


The problem arrises in the interrupt service or skip-chain. It is normal- 
ly coded as: 


TSF /DID TTY OUTPUT INTERUPT 
SKP /NO 

JMP SERTSF /YES, SERVICE IT 

KSF /TEST TTY INPUT 

SKP /NOT THAT EITHER 

JMP SERKSF /XES, SERVICE 

CLSK /TEST THE CLOCK 


If the 'KIE' instruction turned off TITY interrupts, the Clock interrupt will 
cause the TSF to be tested, and posiblzy skip, and also the KSF if a key is 
struck on the TTY. However, the KL8 provides a way around this. It is the 
"SPL" or "TSK" (6045) instruction. It will skip if and only if the interrupt 
is enabled and a teader/punch flag is up. This is coded up as: 


TSK /DID TTY INTERRUPT? 

JMP CLOCK /NO, NEXT TEST CLOCK 

TSF /DID PUNCH INTERRUPT? 

JMP SERKSF /NO, MUST BE READER!! 

ped /SERVICE PUNCH HERE 

KSF /BEST TO EXIT TESTING READER 
SKP /#ASN'T READER TOO 

JMP SERKSF /WOW! READER UP TOO 

CLOCK, CLSK /TEST THE CLOCK 


This enables the KIE instruction to control the TTY I/O to an interrupt driven 


program. I would li aytf hers who are working on the same problem. 
O51) (ae Avery Point, Groton, CT 06340 
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DIGITAL EQUIPMENT GMBH 


DIGITAL EQUIPMENT GMBH Wallensteinpiatz 2 8000 Munchen 40 


Mr. Robert Hassinger 

c/o DECUS 

129 Parker Street, PK-3/E55 
Maynard, MA 01754 


Wallensteinplatz 2. D2 ‘ 
8000 Munchen 40 et Bo02 
Telefon (089) 35031 

Telex 05215780 


Ihre Zeichen Ihre Nachricht vom Unsere Zeichen Durchwahli Datum 
3503- 


Dear Bob: 


Reading Jon von Zelowitz ‘self erasing core zeroer' in the 12 bit SIG 
newsletter No. 28 reminded me of the times when we had the PDP-8 sense 
Switch, the deposit HALT in all of memory and the zero memory contests 
(among others). This was in those old days when the DECUSCOPE used to 
be a colorful marketplace for PDP-5/8 users, around 1967. 

May I recall some of these ventures for the delight of todays users? 


1. A refined German-Wolfberg technique: 


2200 3000 

2772 SKP 

2773 DCA .+3 

2774 ISZ @ /start, AC=9 
2775 DCA I ® 

2776 JMP .-4 

2777 DCA .-3 

3002 DCA I @ 


2. This speed record can be beaten , however, by a basically different 
technique which is more than twice as fast: 


7771 DCA I .+5 /start, AC=0 


7772 = ISZ 11 
4773:.. A352 2*3 
7774 = JMP .-3 
7775 DCA .-1 
7776 900) 


7777) =(JOMS 1 11 
Q290 DCA I 11 


3. Another one with less than 8 instructions: 
TAD 5 / start at Loc 0094 


Sincerely yours, , Li ach ot 


Bankverbindung: Dresdner Bank AG. Munchen, Promenadeplatz, Konto-Nr. 3086124 
Amtsgericht Munchen HRB 42772 GeschaftsfUhrer: J.C. Peterschmitt, Stanley C. Olsen 
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Royal Melbourne Institute of Technology cucrev 


124 LA TROBE STREET, MELBOURNE, VIC. 3000 
BOX No. 2476V G.P.O. MELBOURNE, VIC. 3001 


Id b 
Biers ShOUlG OF Telegraphic Address: ‘‘Meltech’? Melbourne. 


addressed to the 
Principal. Telephone: 347 7611 Extension No. 274 


In reply please quote 


R.M.I.T. Technical College, 

Applied Science & Mathematics Division, 
80-92 Victoria Street, 

SOUTH CARLTON, 3053. 


Robert eee 


Co-ordinator - 12 BIT S.1.G., 

C/o. D.E.C.U.S. 

129 Parker Street, PK-3/E55, 

MAYNARD, MA 01754 

U.S.A. 27th July, 1978. 


Dear Bob, 


The Applied Science and Mathematics Division of R.M.I.T. is 
currently using EDUSYSTEM 25 Version 2, to teach it's students BASIC in an 
interactive environment. 


At the moment we cannot upgrade our software to Version 3 (which 
would allow us to use our mark-sense card reader) because D.E. (Aust.) tell 
us that D.E.C. have withdrawn all EDUSYSTEMS from sale. 


We think that this is in a poor state of affairs and wonder if you 
or your members know whether D.E.C. is intending to upgrade these software 
items or replace them with any similar timesharing systems (preferably 
device-configuration independent) ? 


Failing this, is it known whether these or similar products are sold 
under license by O.E.M's or software houses? 


Finally, we would be very interested in corresponding with other 
12 BIT educational timesharing users, on matters of common interest. 


Yours sincerely, 


A [Clan . 


(A. McCLAREN) . 


SPERY<EUNIVAC 
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P.O. BOX 12056 iF 30 
10 PARK PLAZA 
RESEARCH TRIANGLE PARK, NORTH CAROLINA 27709 


August 10, 1978 


Robert Hassinger, Coordinator - 12 Bit SIG 
Liberty Mutual Research Center 

71 Franklin Road 

Hopkinton, MA 01748 


Dear Bob, 


Here is a concise summary of what I've learned working with the fixed-point 
mode of the FPP-12, along with some illustrations and a listing of still 
another test program. As you can see, the test program is a bit specialized, 
but demonstrates the real problems involved and how to control them. I 

also discovered a special averaging situation where floating-point mode loses 
precision merely due to normalization problems in addition. I doubt hard- 
ware FPPs, at least the cheaper ones, could be made intelligent enough to 
address the problem, but anyone designing a software floating-point package 
could easily code a solution that would probably be faster than the soft- 
ware equivalent of the hardware technique and more precise to boot. 


a Since there is little terribly new here, please edit out what won't fit, 
since it will use up a lot of room and there are few FPP users out there. 


I would also like to make a couple of retractions (both #28, p. 35) 


1.) ALN does work correctly if given 2's complement left 
shift values; it requires 2's complement values for 
a correct left shift. 

2.) In fixed-point FPP division for averaging, the divisor 
is not put into the MSW of the FAC fraction, but put there 
and shifted right one bit. This will then result in a 
numerically correct 2's complement 12-bit quotient in the 
MSW. The reason it must be done this way is that the 
binary point is not at the edge of the fraction, but shifted 
right one bit. 


Finally, a question. I always avoid SQUISHing SYS under BATCH either from 
CCL or PIP. If BATCH is running with input from a file on SYS, is it 
possible to SQUISH SYS? I seem to remember horror stories about SQUISHing 
SYS and dead indexes and exploding OS/8. What is the current legality 
(and functionality) of a BATCHed SQUISH of SYS? 


Sincerely, 


Vi Gains 


Brian C. Converse 
am, Associate Programmer Scientific 


BCC/slr 
Enclosures 


SPERRY UNIVAC IS A DIVISION OF SPERRY RAND CORPORATION 
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FIXED-POINT CALCULATIONS ON THE FPP-12 


Arithmetic operations that are straightforward in floating-point mode 
(such as divide) now require some thought. In the FPP-12 User's Manual, DEC 
points out that it is harder to maintain precision since no normalization is 
performed in fixed-point mode (the user is presumably aware that fixed-point 
mode has a limited dynamic range compared to floating-point). Certainly it is 
frustrating and (happily) hard to justify complicated jumbles of 4-function 
arithmetic in fixed-point, However,), fixed-point mode uses 1/3 less core and 
runs marginally faster; it is an attractive alternative for applications such 
as histograms, pulse counting, and signal averaging. In either mode, the FPP-12 
takes care of rounding (it would be nice to be able to turn that OFF at times!) 
and signs, items that eat up time in double-precision software routines with 
or without EAE, 


In fixed-point mode, all values are treated as fractions, so any arith- 
metic operation generating a non-fractional result causes the FPP to exit. 
Also, in fixed-point mode, the instructions will not bother the exponent. If 
one must float a fixed-point number, this situation can be used to advantage. 
(See below) 


Converting single-precision signed integers to double-precision signed 
fractions may be done via FLDA and ALN, Each FLDA will load two integers into 
the FAC fraction. Using ALN, the more significant 12 bits of the FAC fraction 
can then be moved into the least significant 12 bits, leaving an extended sign 
in the most significant 12 bits. The preferred ALN index register value is 14 
(decimal 12), PDP-12 users note that one's complement integers, such as ADC 
values, must be converted to two's complement before they are subjected to any 
FPP arithmetic. 


Once a number is available as a fixed-point fraction, it may be converted 
to a floating-point value. XTA is the fastest, most straightforward way to do 
this when starting from single-precision integers (again, check one's complement 
data), but the following technique may be used to float a fixed-point sum or 
histogram bin or pulse counter after it has been used for awhile to allow sub- 
sequent, more complicated calculations to be done in floating-point mode. The 
prime accessory required for the conversion is a dummy floating-point constant. 
Its exponent must be 27 (23 decimal); the fractional portion may be anything, 
including any "illegal" value, but zero is preferred. The program should switch’ 
to floating-point mode and load this constant, via FLDA, into the FAC, The 
program then returns to fixed-point mode and loads, via FLDA, the value to be 
converted. In fixed-point mode, the exponent will not be disturbed and remains 
27. The program then switches back to floating-point mode and executes an 
FNORM to produce a floating-point value, This value will be "real" if the 
fixed-point fraction was derived as explained in the previous paragraph or was 
produced by combining fractions so derived in a correct manner. 
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A test program was developed to help understand the use of the FPP-12 for 
signal averaging purposes. The OS/12 (0S/8) core image is built from a LINC 
mode segment and a FPP segment. The LINC code simply generates some "fake" data, 
starts the FPP, and throws some status information into the AC and MQ. A PDP-8 
user with FPP-12 (and probable an 8A user with FPP) could write duplicate PDP-8 
code in about thirty minutes; the FPP code should be universal. 


The test program starts at 4020 and halts. The user sets an "N" value in 
the left switch register of the PDP-12 and some signed constant in the right 
switch register. The program uses four buffers of 512 words; a data buffer 
beginning at loc.O, a sum buffer beginning at loc, 10000, an average buffer 
beginning at 12000, and a baseline-corrected average buffer beginning at 14000. 
When the user hits CONTINUE, the LINC code portion of the program eats the two 
switch register values, stores "N'" in a location known to both program segments 
(setting up such locations is a good Way to develop an interest in MACREL or 
RALF!), and fills the data buffer with the signed constant. Continuing, the 
LINC code clears the sum, average, and corrected average buffers and starts the 
FPP-12 with the CPU locked out. Once the FPP is done,, the LINC code puts the 
FPP status in the MQ and the FPC in the AC, 


The FPP code sums the data buffer into the sum buffer N times, then divides 
the final sum by N and puts the result into the average buffer. This result 
should be the same signed constant as entered in the MSW of the fraction (the 
switch register input is assumed to be 1's complement while the FPP values are 
2's complement). Next,, an average of the 512 sums is computed. This calcula- 
tion can involve a sum which overflows in fixed point, so it is done in float- 
ing point. This avoids the overflow problem, but in turn presents a significance 
problem, The FPP-12 User's Manual (Section 3.8.7) states, " In order to add 
or subtract two-floating-point numbers, the exponents must be aligned; that is, 
the fractional part of the number with the smallest exponent must be shifted 
right and the exponent incremented until the two exponents are equal." If a 
program is averaging numbers such that the sum gets very large, then even with 
four extra bits of precision, the smaller values being summed get scaled away. 
Eventually, the sum divided by N is not quite what it would be if infinite pre- 
cision were available. [As R. K. Richards puts it in Digital Design, "...the 
problem of determining the number of digits that are truly significant in the 
final results, is not solved at all through the use of normalized floating- 
point notation." (p. 370) Software and firmware floating-point packages, since 
they cannot match the raw speed of a hardware FPP, might adopt a more intelli- 
gent approach to addition and subtraction: de-normalizing the larger value 
until it contains no trailing zeroes,] The "mean sum" so calculated should 
equal the value of the individual sum values, since the program is working with 
constants, but for moderate to large constants and N's, it doés not due to the 
aforementioned precision problem, The average is calculated again, using the 
sum minus the "mean sum" and placed in the corrected average buffer. 


The results are: the signed constant in each location of the data buffer, 
N times the signed constant in each location of the sum buffer (fixed-point 
"fraction"), the signed constant in the even locations of the average buffer, 
and zero or -l in the even locations of the corrected average (and zero or 
garbage in the odd locations depending upon whether or not there was a precision 
problem). Any precision problems can be verified by comparing the fixed-point 
mean sum, MEANLC, with any sum buffer value. 


FIG. L: 


12047 
12050 
J2052 
42052 
12053 
12os4 
42055 
12056 


13217 
13120 
232ek 
13222 
13123 
(23124 
£3426 


CONVERTING SINGLE- PRECISION -> D.P. FIxnEO -Pr- 


#30 - PAGE 42 is 


FLOA GEORGE, H+ 


GEoRGE= 12000 
exp. XY=s 0023 


O77 4 2] Msw 


050 L|J/sw 


CFaAc) 


FSTA ALICE, 3+ 


Y= 12000 
42° (c Cxu)rs) 


= 12050 


KH now = Oo24 


am, 
XL= OOLY 
mse 
(Fac) 
Alice = 13000 
X¥3= OO47 
Y= 13000 
+2 Cc (x3)+2) 
= £3120 -~ 


X3 how = 0050 


L204 
L2050 
L205k 
429052 
“42053 
12954 
L2o55 
42056 


43119 
13.120 
£3aak 
A3L22 
13123 
13124 
13125 


FLOR GEORCE+L,4Y 


FSTR 


(erac) 


ALICE, 3+ 


#30 - PAGE 43 


GEoRGE=12060 
X4Y= 0024 


Y= 12001 
+ 2 (eCe)) 


= Le05l 


XL= 0014 


ALICE = 43000 
X32 O050 


Y= 13000 
+2 €¢ (x3)de2) 
= 13122 


X3 now = OOFL 


FIG. 2: ConveRTInG Dovond- PARCcItION FIXED- Polwr To FLOATWE Poinr 


STARTF #30 —- PAGE yy 
FLORA ExPoLy 


EX PoLY = 14000 


STARTD 


FLORA VALUE 
VALVES 13122 
43117 


13120 
13422 


13122 
43123 


/TFEST PROGRAM FOR FPP ALGOPITKM PALS 


same, 


Mu? 
PUPL? 
puran 
Our? 
nunaoe 
Ana 
punea 

an 
G40 
P4arV{ 


AAA 
AXP 
PaP Aa 
ALGAAS 
ANAK 
APT 


AuPIM 
94rt3 
Curle 

AUAL 
Pur. 
04715 
PuPLE 
Puri? 
Pyrar 


AUe2) 
M420 
A423 
sme 2 ly 

P25 
AuPeb 


A144 
(AACA 
AS ,? 
RATA 
ARTA 
HALLS 


{aan 
Aaan 


‘AATA 
6777 
AAT A 
4777 
CHUA 
AS1& 


AL i f 
Ae14 
152A 
$737 
ANGT 
AALT 
{ATA 
APs 
Geil” 


AGUA 
6°75 
W645 
6278 
A644 
6275 


e=VS B/3/TA PAGF 1 
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/TEST PROGRAM FOR FPP ALGORITHMS 
/TN CHECK THE PROPERNFSS OF THE RFSULTS wiTH 


FIXED 
/ 


POTNT MOME ON FPP 


/JTRIS PROGRAM ANES THF FOLLOWINGS 
SETS LP A SqeaWOPOh FIXFN STZE FAKE PATA RIJFFFR 
STARTS THE FLOATING=POYNT SUMMATTON/AVFERAGE 


eM 
se. 
, 83 
/ 


STNMPS SO USER CAN 


FYAMTNF RESULTS ANN SAR RESTART 


/PROGRAM STARTS AT LOC GRAM] START RY T/NM PRESET Th 
/ [TMP MONE? START 20,,.0R LOAN FROM NS/1? FSTARTS 

/ AT 40497 FOR YOU)... PPOGRAM WILL HALT 

/JUSFRE FNTERS MFSIREN VALUES TNTA LS ANR PSW AFTFR HAIT, 
/LSWe NUMRER OF SUMMATIONS NESTREN REFORE AVERALING 


f/2SWe VALUE TO FE PIT IN 


/ 
/HAI TS 


/ 
KH A17 


4 PAD 


NTRTAL, 


LOOP, 


FACH PRINT OF RAW MATA RIIFFFR 


WHEN NCNFE WITH FPP STATUS TIN MN AND FPR YR AC 


LINCELMODF 
HLT 

Sw 

JMP NTRTAL@1{ 
NAP 

NAP 


STA T 
p 


SFT T 13 
12080 
SFT T 1A 
3777 

LOAF @ 
RSw 


SNS 1 
JMP +5 
SRO Y 
3737 

SKP 

CAM 

STA T 12 
¥SK J 19 
JMP LOOP 


LMF 4 
JMP CLRRUF 
LOF 5 
JMP CLRRUF 
LOAF 6 
JMP CLRRUF 


/FOP AS/12 ENTRY 


/FOR USFR START FROM CONSOLE 
/GET # TIMES TO SUM FAKE NATA 
/LE AVE SPACE SO NTRTAL WILL BF 
/FIYER FVFN THOUGH PEM TS ANNDEFD 
7TQ IN HERE 


/SAVE FAR FPP USF 


/LOUNT POINTS 
/START MF RUFFER 


/RUFFFR PRANK 
/GET USFR®S NESTREN VALINE 


/TF THIS SW UP, ALLAW A Sf, 
WAVE TON RE RBUILY USING * AND 
/~ VALUFS OF THE MATA EVERY 6 
/POTNTS, FLIPS PNLARTTY NF 
/FAKE DATA FVFRY & PCYNTS,,. 


/YRITFE INTO BUFFER 
/COUNT POINTS 
/NOT PONE 
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/TFST PROGRAM FOR FPP ALGORITHM Pa&aL{1@eVS B/3/70 PAGE j=} 
AuPPey {ASA LNA T /NDONE, START FPP 
AuPesnm wvaAen en 

A4PS1 = AAHG ESF /D0 AN J/N PRESET 
AdP3ZS {APN LDA I /JNOW FIX HP APTIAL 
Aues® 5aaa SAAA 

M4PsKH 45C4 STC APTLOC#{ 

AMAZE AeM LRA TIPMONE 

Auese ASL FPINAY 31 MORE 

A4uP37 452 STC APTILOC+4? 

A4P4A U45AaN STC APTLOC 

AUP4t ASA STC APTLOP+% 

C4Pde 4So4 STC APTILOCe4 

Adee ASHS STf APTLOf¢S 

Aueud ASA STC APTLOR46 

Fu2e45 ASNT STC APTI.OC47 

Abeah {MPM LNa fT /SET LIP COMMAND RFG 
AueuTyr GAYA 4aaia 

PuPSA NS InB 

AUPS{ H55% FPCOM 

P4uPSP 1AM La TFPMONE 

AH“A53 Asan . APTLOCFJLMANE 

AaueSa “45n" ™O8 /START. FPP? PAPelA TS LAPKER NUT 
Auwess 6555 FPST 

AuPS& FT? JMP PRORLM /TRTS IS TF THERFE*S A POORLFM 
94°57 asad IN6 

PuPKA 6557 FPTST 

C4P61 6A57 JMP 2 

PuUPAP M354 SCR 14 f=>MhMQ 

A4P63 19848 LNA /JNORMAL RFTURN 
Pur6od 4501 APTLOC +1 

Aue6S ABA HLT 

AXPbR AMAA HLT 

APUPKT ARAN HLT 

AP4PTA baT”A JMP , 

AUPTI BAan HLT 

A4ATP AAI PROBLM, CLR 

AwP7T% A%54 SCR 14 

A4UPTE f2ebS JMP #7 

a4e75 Yne?7o CLPRUF, SET TI 1A JLITTLE RAUTINE TA CLEAR RUFFFRS 
A4P7T& 3777 3777 

AUAT7T HATS SFT I 11 

Ausra saga {777 

AUSAL AALS CLR 

AUZBAP PARA ANN @ 

PASAT AAT STC CLREXT 

AU®Aa LATA STA I 1a 

A4SAS Aes! XSK T 14 

AU®tAR 6304 JMP .#o 


AUZAT 6307 CLREXKT, JMP , 


/TFEST PROGRAM FOR FPP ALGORITHM PAL!2=VS 8/3/72  — PAGF_ tee 
a 

AUS wASAC 

PHEAA AAAM APTLOL, A 

CABAL Sano Saar 

PA5HD ABA FPINDX 

PuSAs aran p 

P4SAG AAA ~ 

AABAS waa a 

PUSDH aAapA a 

ANKAY ABAA Gi 

nu4sio vag” FPEINDY, A 

PAR1yY Aran a 

F451pP ange cs 

FaS,~s Anan e 

PUsia wAaga a 

F4E15 wane a 

F4BiA BoRA 0 

AMR 7 War a 
A55% FPCOM=695% 
6555 FPST=¢555 
6557 FPTST=6857 

§ 
7 

/TFST PROGPAM FOR FPP SBLGEORITHM PAL{2=VS B/B/7V PAGF {=% 

APTLAM a5aa 

CLRRUF 4275 

CLREXT 4247 

FPCOM 6&55% 

FPINDX 4544 

FPTSYT 6857 

FPST &S55 

LOonP 4oqn 

NTRTIAL Gens 

FROBLM 4972 


#30 - 


PAGE 47 


FLAP V 


AasSAnA 
ASAA I 
A5AAP 
ASPAS 
asSaua 


agaas 
ASMHK 
A597 
Asan 
A5AL4 
ASA1e 
ASA 
A514 
agais 
AS50164 
5017 
asaen 
A5M24 
A5AAP 
C5923 
A524 
a5225 


A526 
a5027 
asaso 
A503) 
A542 
ASA33 
a5034 
25035 
A536 
A5A37 
a5n40 
ASA 4) 
aSade 
ASM43 
a5e4a 
95945 
A5M46 


54a 


2A% 
1190 
4519 
112¢@ 
52%A 


naar 
42e2ni 
12040 
Sate 
Rane 
AUL1 
64a0 
5245 
AWAS 
UAE 
527 
AAP 4 
AAA 
5245 
PALS 
6420 
5243 


11° 
520? 
asso 
AAAA 
AALL 
1120 
5172 
6521 
BAAD 
P4sa 
AAAL 
Aoit 
1120 
5170 
6521 
BAAD 
2120 


AUG 4%, 


/FPPel2 
JSTARTS 
/NOES N 


STARTING @ LOC 129007 S12 POINTS, 


JFOUND IN NTRIAL FOR # SUMS TO AN, 


7A PAGE 1 


#30 - PAGE 


PART OF TEST PROGRAM FOR FPP ALGORITHM 


AT LOC 5A09% 


SUMS OF FAKE MATA RUFFFR INTO RUPFER 


USES VALUE 
USES VALUF 


JIN NOYXYSET TO DECINE wHAT TO SET INDEX REG 2 TN, 
/JOMES MEAN ON SLM B4 AVERAGE? STORES MEAN YN 
/MEANLCP WRITES RAW AVERAGF TNTO BUFFER STARTING 
J@OLAAGAP WRITES AVERAGE WITH SLIARTRACTEN MEAN INTNA 


/BUFFEFR 


START, 


CONTNU, 


FYRSUM, 


STARTING @14902, 


NRE SAAP 
STARTD 
SFTX FPINDX 


JSA COMNNX 


FLOA NTRTAL 
JNE CONTNU 
FEXIT 

ALN 1 

FSTA INPLTN 


FNFG 
FSTA NEGTRL 


ATX 4 
FLAA INPUTN 


ALN § 
FSTA AVGNVL 


JSA COMNDX 


FLNA DATRUF, 3+ 


ALN 1} 
JSA KQREKT 


FSTA SUMBLF,A+ 


FLOA DATRUF 41,3 


ALN 1 
JSA KOREKT 


FSTA SI'MRUF,2+ 


JXN FIRSUM,@+ 


/GFT # FAKF TRIALS TN SUM 
/IF 7EP0, GET OUTII]! 

/GFT # IN {SW OF Fac 

/SAVE AS N VALUE FOR CALAVG 


JMAKE TT 
/SAVE YT FAR LATER 


44 COUNTS SUMMATTONS 
/NFEN WN IN MSW TO AO NIVISTON 


/FOR AVERAGE 


/GFT A PATR 


/STRIP OUT LSW! MSWe>l SW 
/1*®Sm—m>2a°S LOMPLEMENT CONV, 


SUM VALUE INTO SIiM BUFFER 


/GFT OFFSET PATR 


48 


FLAP V 5@ auG %, 74 PAGE t#1{ 


PSeaT Sasa #30 - PAGE 49 


am ASASM P14 JXN LOPSFT,4G+ 
AP5e5q Sasa 
ASASP 137 JA MENCAIL, /RFRE ONLY TF # SUMS=#1!)! 
ASeS® SiAA 


JNOW DM A LOOP TN AN THE RFMAINIANG (CTF ANY) SUMMATTONS 
/OF THF NATA BUFFER 
/ 
A5AS54 1120 LOPSFET, JSA COMN-AX 
5755 5eAe 
A5S%5& PSA SUMLOP, FLOA DATREUF, 3+ /NOW LOMP FOR REMATNTRG TRIALS TO 
ASPS7 Auge 


ASPHR FPL) ALN $ /BE SUMMED? USF FANDM STATT FLEAS 
M561 1172 JSA KOREKT /1°S=>2°8 COMPLEMENT CONV’ 
A506 5170 
A5PARZ 550 4 FANDOM SUMBUF,2+4 /SIIM VALUE INTA SUM RIJFFER 
ASPHA AMAA 
PSAKS MU FLDA DATRUF4(,% /GET OFFSET PATR 
ASARH AUS 
CSCH? PALS ALN 
ASMTA 1120 ISA KQREKT 
ASt7{ S174 
PSATA 5521 FADOM SUMBUF, a4 
ASP7% npaAn 
en SOTA BILAL JXYN SUMLOP,@+ 
ASATS 556 | 
P5SOTH PLUM JYN LOPSET,4+ 
A5e077 S5aS4 
AS1IAP 1128 MFNCAL, JSA COMNDY /CALCULATE THE MEAN SUM VALUE 
AS1U1 SAAP 
PS10He A1AP LNY =777,0 
a5143 TAA 
A51A AAAS STARTF /m=>Fi,. PT. MADE 
PS5iG5 nape FLDA EXPOLY /GFT 27 ACTAL YN FYPONENT Of Far 
OS1MH 5236 
CS107 Arne STARTD /PAK TN FIXED PT 
ASY1N OSA4 FLNA SUMBUF, 24 
P5114 BARA 
P5112 ARPS STARTF Fi, PT. MANE 
95113 PEC4 FNORM /MAKF YT NORMAL] 
e5114 B4an FSTA MEANSM /WHY NO ARNORMALTZE YINSTRUCTYON? 
M5118 5Se24 
M5116 gurn FLRPA FXPOLY /GET EXPNNFNT RACK 
A5117 5236 . 
PBY29 AA7H MEANLP, STARTD . JeeePFCALISE PGMS, SEEM TN AO THAT AUTOMATIC 
C5424 ASA FLRA SUMRUF,A¢ /LQMOP TO AA THE PFEFMATNNER NOW THAT 
AS1iA2 Agar 
C512A% AAAS STARTF JANY RFSTDBUE IN MEANSM NVERWRITTEN 
am ASIP ANA FNORM JBNY, POFS THIS RIURN UP TIME! 
A5125 Suan FANDM MEANSM /hOW ACCUMULATE SUM 
25126 5224 


P5127 gaan. FLOA EXPOLY 


FLAP V 


75132 
A515! 
A513¢ 
513% 
AS5i3a 
AS5135 
AS54356 
45137 
P51 4a 
PS 44 
PSiuP 


P5143 
AS aa 


PS146. 


AS146 
P5147 
AStSA 
A515$ 
A5ISP 
A515% 
951594 
A5455 
AS51564 
45157 
5140 
A516! 
A516e 
0516 
AS5SI64 
@5165 
05166 
P5167 


ASi7A 
ASt74 
a517e 
AS173 
A5174 
P5475 
AS17A 
A5177 
AS PUA 
P5Pu4 


G5Pne 
A5PAS 
75ea4 
A5eaSs 
ASPAS 
AS207 
aAsei1a 
A5P13 


52 


5PtA 
e1a¢ 
5122 
Muro 
Reed 
Bann 
523% 
AHA 
ABPRG 
64°R 
See? 


{ien 
522e 
ALAA 
THEM 
ASP 
AANY 
3400 
Beds 
6533 
CAA 
AK} 
MARGE 
Cua 
5ePA 
BAAan 
5243 
6431 
Anan 
e17e 
5147 
aaaa 


2ABY 
nang 
195@ 
5176 
1430 
5176 
14280 
S2u1 
1A73¢ 
S17 


2AB2 
AAA 
PIA 
TU 
ALA 4 
AML4 
7182 
7777 


AUG 8, 


AVALOP, 


FINISH, 


KOREKT, 


BIASNG, 


COMNDX, 


72 PAGE i=? 


JXN MEANLP, A+ 
FLQA MEANSM 
FOTV CFIADA 
ALN @ 


STARTD 
FSTA MEANLC 


JSA COMNNX 

LOX -1090,9 
FLDA SUMBUF, 2+ 
FOTV AVGNVL 
FSTA AVGRUF,3+ 
FLOA SUMBLF,? 
FSIIB MEANLP. 
FNTV AVGNVI. 
FSTA CORAVG,3 
JXN AVGLOP,@+4 


FEXIT 


apa 
JLT RIASNG 
JA KOREKT 
FAND SPRONE 


JA KOREKT 


LOX =400,0 
LOY 14,1 


LOY 1,2 


#30 - PAGE 50 
/SAVE SUM FOR INSPFCTIAN 
JOIVINDE RY 1004 
/FIX YT RACK TO NP 


/eaeAND GO BAK TM DP 
/SAVE FOR USE IN MEAN SUBTRACTION 


/COUNT FOR AVERAGE 

/GET A SUM 

/NTVINE RY N 

/SAVE TN AVERAGE BLFFER 

/GFT THAT ANF AGAIN 

/NOW SUBTRACT MEAN 

/NYVNE BY N 

/SAVF IN "ECQRRECTED" AVERAGE BUFFER 


/REPEAT FOR ALL POTNTS 


/# rs + 


/# IS =p AND 1 


/THIS TS MOST@USEN VALIIE FOUND 


/JALIGNMENT CONSTANT 


FLAmP vo SE AUR 3, 70 PAGE 183 


BuaTP AIM LAX =1,3 #30 - PAGE 51 
creat F777 

JNOTE NOTE NOTE AO NOT SET 4 INSINF THIS SUBROUITINEL Ls yhh 
ARP TA MAAS try «(3,5 AUSE THIS ANLY FOR OYVPSORS! 

CSe4S 77RA 

MHPYA FLF? LAX 4,7 

PSAy7 VI77 

Ppa 193K JA COMNNY 

C5224 Sarp 

Cla2aPp PAAR MEANLC, @:0 /MEAN SUM 

AN AAT AMAL 

B97 Pu SORA MEANSM, SASH JSUM OF THE S42? SIIMSe FLAATING PINT 
OR ABR PAG 

PS29K LAAD 

CaPLT AAG MEGBTRL, OFA /eN FOR COUNTING SIIMMATTANS 
NGPA eoae 

/ 

Pe REE REE KKK EK EKEKEANATE | wae eRe Re KR ER RK 
rPR2I3) RAMA Lyaga, APA AOCTAL 19AMsNEF, §12 IN MSW FOR RIVISTANS 
RaP se PAA 

NOTE TT TS ROTATER RYGHT Th MSW J BITE} 
PEStT OM CEIAAA, F S1iP,e FOR FLOATING PRINT 'ISF 
eHhP Se Paar 
C5RSS PADD 
CRRA AAT FEYXPOLY, 277890 /JUST A NICE EYPONFNT FOR FI, PT, ADWISTS, 
CRRS7 Gty 
CHAE PAL os 
mEIG1 AGAR SPRANF, M34 ASTNGLE PRECTSTON "¢" FOR CONVERSINNG 
CSP P AMF 
CSP4S PAGA AVGNVL, O34 /N VALUE IN MSU 
r3e4a PAE 
v52u5 640% YNPLITN, Ara /\ VALUE IN LSU 
FRPAKR APPAR 
DATBUF SA 
SUMRUF&1AAAG 
AVGBUFELAAAG 
PORAVGS14anA 
NTPTAL B@aeny 
FPINMXe4510 
FLAP Vo SP AUG 3, 70 PAGE 14 
NG ERPORS 
°7 SYMPOLS, NO LINKS 
AVGRUF Leann AVGLOP @5147 AVGNVL am52aq% RIASNG @5(76 
CFIPBe FSAz3 COMNAX B52R2 CONTNU asaya COPAVG (4gae 
RY APA AS2Axy PATBUF A290 EXPOLY a5236 FINTSH A@S{L47 
FTRSUM Aa5Smzg FPINTX @451@ INPUTN aS eas KOREKT @817¢ 
LOPSET aSe5a MFANLE @52e2 MEANLP AS54120 MEANSM A5224 


tC 
-R PAL12 
PAL12-V@6 
* TESTLN>s TESTLN<TESTLN. 12 
Cc 
eR FLAP 
* TESTFP, TESTFP<TESTFP.12 


#30 - PAGE 52 


/, 12 extention eases editing via SCROLL 


LO TESTLN»s TESTFP=4017 //. WLTS when loaded by OS]2 ov aftev 
\Jo Preset, stat ro on PDP-12 


SAV SYS TESTLN 


(the on\y VeK SON things stuart @ 4020 


$JOB ERASE AFTER 8/3 


-R' FLAP 
* FPAVRG» FPAVRG<FRAVRG.12 


eR FLAP 
*» TESTFP<LTAG: TESTFP.12 


eR PAL12 
PALY2-V06 

* ONLDGR» ONLDGR<WORKD/S 

ASSEMBLY OF ON-LINE DIGITIZING PROGRAM> 
ASSEMBLY OF ON-LINE DIGITIZING PROGRAM> 
eR PALI2 . 

PAL12-VG6 

_* » TESTLN<LTA®: TESTLN. 12 

eR CREF oS 

* ONL DGR 

*LPT:<FPAVRG-LS/A 

$MSG TURN PAPER AROUND! 

eR PIP 

*LPT:<TESTLN-LS/A 

*LPT:<TESTFPeLS/A 


~ * FPAVRG eLS»s ONLDGRe LS» TESTLN. LS/D< 


* TESTFP.LS/D< 
eR DIRECT ; 
*#TTY!<SYS:/E/B/=2 = €&——— _ MJOSRENT WORK 
_# ILLEGAL SYNTAX 

SEND - 


#END BATCH 


*~R DIRECT — ee 
* TTY? <SYS3/E/B=2 WARl4s .., 
@3-AUG-78 


ABSLDR.-SvV*tC 


ae ene is yes turt COnvemence OPW Poe -i2) 
ars - SUB orveayie ee ee 


> Rob- | Can't End: | 


Ony yeference to this 
DIRECT problem tv” 
the news leTler - has 
it been re portea | C 
Am | doing rome thing 
dumb 2 


am 


#30 ~ PAGE 53 


rae THE ROCKEFELLER UNIVERSITY 


ny 1230 YORK AVENUE - NEW YORK, NEW YORK 10021 


N 


June 29, 1978 


Mr. Lars Palmer . 

DECUS/Europe 12 Bit SIG Newsletter Liaison 
Hassle 

Fack 

S-431 20 MOLNDAL 1 

SWEDEN 


Dear Mr. Palmer: 


I am writing to you about DECUS program number 8-690. As you may - 
recall, it is a random number generator which can be called from 0S/8 
FORTRAN IV. I cannot get it to work correctly in a standard conriguration, 
and I thought that you might have some idea why it is giving trouble. 


Briefly, the subroutine produces non-random numbers when used with an 
a Extended Arithmetic Element (KE8-E), but seems to produce a nice flat 
random distribution when the EAE is disabled. If you have come across 
this problem, or can think of a reason for it, I wouid very much appreciate 
hearing from you. If not, perhaps you would be good enough to forward this 
letter along to the Wer-+e 12-BIT SIG Newsletter in order to inform others 
of the apparent problen. 


To be more specific, I have a PDP-8/F with 2hk words of core memory 
and an EAE. Other FORTRAN IV programs seem to run perfectly well whether 
or not the EAE is disabled as described in the FORTRAN IV software support 
manual. But when a test program for subroutine RANDU runs with EAE, it 
produces no numbers in the range, @A to 0.33, about twice as many numbers 
as it should in the range between 0.34 and 0.65, and approximately the 
correct frequency of numbers in the range 0.66 to 1.00. Attached is my 
little test program of RANDU and some output from it with the EAE in and out 
of the system. 


The version of FRTS which I am using is version 4C, with a patch included 
to run the Phelps USR routines. 


I should mention that the EAE craenosrs cs seem to run perfectly well on 
my machine. 


I hope that someone with more knowledge than I have concerning the 
Floating Point Processor conventions and the FORTRAN IV Run Time System can 
find the solution to this problem and allow me to rum your extremely valuable 
random number generator. 


Sincerely yours, 


, *O 
My Ralf fasting Cr. tor~- 


Ss 
P. ‘deatica! to the oF ae 
phe weittep Ronald P. Larkin 
RP?/rbk Assistant Professor 


an 
~wy ; a Cc 
€. — a Date Our reference 


AB Hassle Subsidiary of Astra Pharmaceuticals AB Your date Your reference 
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Ronald Larkin 

Rockefeller university 

1230 York ave 

New York 

NY 10021 

USA 


Dear sir 
I have looked a bat at your problem. I ran it in 
the FPP configuration and got exactly the same result as you did in 
non EAE systems.I do not have an EAE so I cannot test that but 
I think that what we have here is one further case of the now too frequen! 
errors in FRTS where the FPP emulator does not behave the same way as 
the hardware. . 
I do not heve the time to try to trace the error by reading 
the FRTS list but I suspect there is something wrong in the usage 
of the EAE (in association with the TRAP ?). 


My attitude is that the hardware (FPP12 or 8A)should be the reference and 
any divergences in FRTS suftware rutines(I know of at least two one which 
mede the early veriosns of R.Phelps USR rutine misbehave in an fpp 
configutations)be regarded as errors. . 

I“m sorry I cannot help you more then this,I shall forward the material tc 


Bob Hassinger and hope that someone can help you. 
oP (LA 
Lars Palmer oa a 


Postal address Office and laboratories Telephons Cable address Telex 


AB Hassle (in English Haessle) Karragatan 5 (031) 87 01 20 Abhaessle Gothenburg 208 10 Haessile S 
Fack MOLNDAL 
S-431 20 MOLNDAL 1 Sweden 


Sweden 


pa 
[-] a 6 6 | (-} Date Our acne 


AB Hassle Subsidiary of Astra Pharmaceuticals AB Your date Your reference 
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‘Dan smith 


cc to 


Eye research centre 
20 stanifor street 
Boston mass 02114 
USA 


re EXPIP 
Expip should handle all dates correctly but due to a programming 


bug it doe not.Patch the following and it will: 

locations 47 54 6Y 70 and 126 are cma(7040) should be cia(7041) 
location 63 7450/7540 

location 72 7550/7510 


I will look at the C problem. It is really 2 parts to it : 

one that Expip resets the date to get the correct date on the new file 
and that I think is solvable, the other is where EXPIP does a FOTP 

like transfer and writes a dictionary before transfer(/W option). this 

is more difficult so solve and I probably will not have the time to do so 


I use EXPIP mainly with the /L option to find the most recent file 

whe using slo media(dectape) as FOTP transfers are much faster(even htan 
the /W form) Transferring between disks there is no need for the faster 
form and the problem does not occur on ordinary transfers. 


I find that the options that I use EXPIP for now (that FOTP has come) are: 
1)/L comparisitions to see were the most resent file is 
2)transfer and delete after transfer 
3)merge files (is much faster to construct a 20 rutine Macrel library 
than using PIP 3 times ) 
4) recovering lost blocks or rather files as a compliment to the STECO 
and pip /I methods. 


The re&@l diadvantage with EXPIP as I see it compared to FOTP is the 
weaker decoding of wildcards and That I have no time to fix. 


I hope this helps you a bit 


eae /lars Palmer/ 
bob hassinger | 


Postal address Office and laboratories Telephone Cable address Telex 


AB Hassle (in English Haessle) Karragatan 5 (031) 87 01 20 Abhaessle Gothenburg 208 10 Haessle S 
ack ; MOLNDAL 
S-431 20 MOLNDAL 1 . Sweden 


Sweden 
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SOFTWARE ial 


SPA Oneal 
PERFORMANCE See 151954 


REPORT pany Wil SCAVICES < 
PAGE Sct x! or I 


ST Ne on 


VERSION SYSTEM PROGRAM OAR DOCUMENT TITLE 
. ov wee 


v3D ELI 
io jEE EXAMPLE IN SETH INSTRUCTIONS) DEG OFFICE 
me: AE ISTADR WINDRAM 

to Thi GRAS SLANDS RESEARCH Ins fLTVTE 


REPORT TYPE ; PRIORITY 
é 
[71 soFTWARE ERROR 0 tow 


— MURLEY , MASDEN HEAD, BERKS. 10) vocumentation ennon [1 stanoaro 
! | 
U * IK : ZIP: 


= BY: PHONE: 


O INQUIRY HIGH 


(] For your INFORMATION/SUGGESTION 
CAN THE PROBLEM BE REPRODUCED AT WILL? 


A. WINDRAN ves OY no (J 
ATTACHMENTS COW ON THIS SPA HAVE REFN PREVENTED BY BETTER OR e 
IAG tare C) FLOPPY oISKS C]) LISTING (] MONT NOCUMENTA HON? YES oO No i. 
pectare [1] OTHER a oe PLEASI EXPLAIN IN RIQVIDEO SPACE BELOW. 
boiven ~~ SERIAL NO. MEMORY SIZE DISTRIBUTION MEDIUM SYSTEM DEVICE DO NOT PUBLISH ( 
3 ees _) 
L % Ir. De y% Ih Q Ee TAPE Co Ainge 


The patch te EdIDT Vi2A) fe cure lest Tabs - brow gh fe LighF  preblemn bin 
ithe NN Commend AcadkGr. Lecatren Com : ~| Ls altered A, t he Naw 


igi ek gs wrel tally TMP puMcH43 » Nene of (is matters ual 


you shart | Joey uw fp (he paddle AG Ge Lire iV Ag. wall cr. Then t- 


Ly Df you Aue ae wer wcdecl AL ar YY bah Ane ~~ Some Pansy pha el, 


“ 
(eff OVTDEV sel lo ek ) Garel yew Serey a C2. Malpas biffer gets Se-/ 


lo bee eensde Wsbead ¢ def % (he olor fate! 
@4, =f 


This cml be Ascesl by Charing JMP Punsde? Co TMP PUNCH 
IZ6e/F3eu Ster 

7 (N:rY) = | | . 

| x If tie baslicemmand befere Q wes y 5 Grew itshen yer f ope Q yin 


| jus kil the buffer ors Ped fh onl tiny ur. Thus gen Lose Che bsl {4 e! 
This u nit So CAKK) f © px ; 


I Yrurk the ViI2B palhch aceds a pe-Kuik One Wty vee 
LOS 308 2974 
URIB/ anne B11 25 577s 43el | 

The sup Scure Chiny & us te pele. fz tae MCA TABIND frm Comt1, -2 fo Pune, -f[ 


NAME: ALISTAIR WINSRAM 


Hg 
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rn re 2 


SOFTWAIE SERVICES NO.: 


STV WT Sy SNE ee a Pe ae eT ik PA 
SYSTEM PROGRAM OR DOCUMENT TITLE GE aes ___ OF. } a 
PEP 


a SOFTWARE 
PERFORMANCE 


VERSION OR DOCUMENT PAT NO. 


HAVE ACCES; 


REPORT TYPE 
PRIORITY 


(J sortware ERROR 
0 tow 


IRM: RASLANS RESEARCH DVSTETVUTE 


ADDRESS: UAL EY : 
U d eo IN DOCUMENTATION ERROR 0 
Ss 
ee eas LDL ee ee ZIP: O INQUIRY wi eee 
: ————— = HIGH 
stra es PHONE: () cor yo 
incuart Ao WENSRAM CAN THE aa INFORMATION/SUGGESTION 
ca aaa se faL Thar ok Uf tens 2a3h. BLEM BE REPRODUCED AT WILL? 
maa TAPE O SR ee TS ss yes ae a 
een Ns 
Prunes DECTAPE [] st] usTiNA T monc THIS SPR HAVE DEEN PREVENTED eee aed 
U TYRE SERIAI. NO. rere SOUTHER NG MIEASE Expcais in Pro EN PREVENTED BY BETTER OR” —— 
: . i OnY Y sizk Le ee bss 2LAIN IN PR , 
3 £ DV Ou. g i( Ie DISTRIBUTION MEDIUM Sey eee era OVIDI'D SPACE BELOW. YES a ey cr 
Mee ee te et ran dD : SYSTEM DEVICE tee at ee ere 
aa a eC TAD DONOTPUBLISN 
re _— eee ee tees ee VEBLISH a 2 
ee As Age mn 


© PLP 
* op pe x vp ah fa /y¥ 
bw 5 YAW Ss 
YS GaNs “BA of, dlp 
ae ae ) D SYST EM HEAD" if- mpl Al us r boince ; 
; systen., > UN a eeyce re btn nares 
ae | e ae), 
7 tN ( Ws ot > ne ; 
US (Kab bre [rte tc pk ee cetke Che hes eel: 
vaslerd L bleck or Cp. Poo { file - 
Ong, Wr : : 
ay ye ps Pee. pe ANG " tA ro ws a 
se Che da Wen Z [r& /Y Cet fu gic Et 
: Pane, a? 


Chelny. 


| The VA. . ‘ha 4 4 & te “\ a f 
Sc Mu c Ww € x deticl A cw Che c v Less 3 by 
@ re e 


coe cae seo sae 


lal 4) . : ° a 
7 a be caurtst 


rs aN 
SQURCE CHANGES TO PIP Vila TO CURE #FILESFILE/Y BUG 
+ K200, +2 CHANGE MIF yrsouT TO vMP YNOOUT 
a YouRyS 24 RELOCATE TE e701, SZA CLA: JMiP 1 CIMGTST 
To JUST BEFORE YINREC, *® (TAD YINREC) 

AT ERRI1, +2 LINES sNeEnt aneTens SADE Cle20) 24h CLA: vMP IMGTS2 
i- aT IMmeTST. -@ CHANGE TAD K7 TQ TAD (7 
a AT IMGTST: CHANGE IMGTST, TO IMGTS&, 
2 aT IMGTST, +3 DELETE 7 Lines «clr o TO JMS I (TSTHED) 


os) een, 
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. arm rey Bi. SOETWARE es Nop So eR oe 2 eo s 
ie sf ENG PERFORMANCE [|___ . ~154131 


ERs eee 


roped REPORT -° "TES FEWA ii SElWIeES Now T 
4 4 
| ER eee es PAGE OF oes 2 ee 
VCWATING SYSTEM [VERSION | SYSTEM PROGRAMOR DOCUMENT TITLE | VERSION OR DOCUMENT PART NO, DATE 
wifb V 5D PIP | Vita 9-Sih. 78 
CE EXAMPLE ININSTRUCTIONS) = © caer < ‘fice DO VOU HAVE SOURCES? — Vesf_) | 
“ame: Alistair Windram ia, [Stee eee n,n lg) 
rami The Grassland Research Institute RESO EVE PRIOvITy LJ s. 
: , : [x] PRODLEM ERROR fed 4 
ooress: Hurlcy, Maidenhead, Berks, U K SUGGESTED ENHANCEMENT BES 
OTHER ie 2. 
x] 
\UGMITTED BY: ~~ ~——C—<C PONE?” ‘GAN THE PROBLEM BE REPRODUCED AT WILL? > |. 
A.Windram littlewick Greon 3631 . ves [xl sal] 
era mgrrvommcy  usrineO) Geese stare tnneeerneeOe. a cole wal 
vectare () OTMEG oe PLEASE EXPLAIN IN PIROVIDED SPACE BELOW. 


‘PU TYPE ‘SERIAL NO. MEMORY SIZE | DISTRIDUTION MEDIUM SYSTEM DEVICE DO NOT PUBLISH 4 
«SE 204.8 46K Dectape | RK8E Please Publish. 


~ 


Tho modifications to the /Y code have introduced a serious bug. 

The problem is that the /Y code now reads 14 blocks at a time instead of 13, 
into 00000 = 06777. : : 
This overlays the input device handler which loads into 06600 ~ 07177. 


Thus /Y transfers with non-resident input handlers blow up tt 


06600 ~ 07577 is all needed for device handlers in case of “deviddev2/Y 
where devi and dev2 have different non~resident 2-page handlers. 


You must go back to 13 blocks per transfer as before, and find some other wey 


to fix the problem of system-head files which are right at the end of a device. 


Since there is another /Y bug, and the source fix for this actually frees some space, 
there may be room to combine the fixes in the area currently available. 


I think a patch may be slightly more difficult § 


ee oe ee Se... 


AXXO AKKK 
#30 - PAGE 59 215-985-7733 


BICKLEY LABORATORIES 


COMPUTER APPLICATIONS 


47 Ivy Mills Road 
RD2 


Glen Mills, PA 19342 


Robert Hassinger, Coordinator 

12 Bit SIG 

Liberty Matual Research Center 

71 Frankland Road 

Hopkinton, MA 01748 

Dear Bob: 

Here are a couple of patches for BASIC and one for CCL which I've submitted 
to DEC. Knowing the incredible delays that occur from the time an SPR 

is reperted to piblication, I'm forwarding these to you so 12 Rit SIG 
member's will have advantage of them much sooner. 


By the way, Bob, you are doing a great job! Thanks ever so mech. 


Sincerely, 


Iyle P. Bickley 


VANLYU FUNM NYU, Sleousrcot 
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Seven Seer ite : Lea 
al; 
| 


dé ed PA iF Bn eah cAice FIELD #: cone 57950 
REPORT _ POR DEC USE ONLY ee Gee es. 


Cpe x 
SYSTEM PRO AND VE 
CCL 


re RSION (OR DOCUMENT) Mm OS/8 “vb B= AUG~78 


DEC OFFICE 
NAME: lyle P. Bickley Blue Bell, PA 


Firm: Bickley Labs 


REPORT TYPE _ PRIORITY 
aopress: 47 Ivy Mills Road LOGIC/CODING ERROR [J cow 

[) DocUMENTATION ERROR [-) stanparD 

[1 suacestion (20 uicH 

(7) inquiry 


SUBMITTED BY: 
[-) For Your INFORMATION 


LIST ATTACHMENTS CAN THE PROBLEM BE REPRODUCED AT WILL? 


1) Source compare (SRCCOM) of changes 


, X)ves [Jno 
CPU TYPE SERIAL NO. SYSTEM DEVICE MEMORY SIZE DISTRIBUTION MEDIUM 
PDP-12 561 RFO8 16K DECTAPE 
PROBIEM: 


When an @file.CM is used with the semi-colon feature of CCL, unpredictable results and 
system crashes can occur. . 


DIAGNOSIS: 
When @file is used and the command string is relatively long, the buffer used to 

contain the concatination of the @file with other command date can overlap the 

GLINE routine in the keyboard monitor. ‘This created no problems with earlier 

releases of CCL because the GLINE routine was never again refenenced by CCL. With 

the advent of the semicolon option, however, this was changed. ‘The semicolon routine 
stores a 7600 in GLINE and in the event of a trailing ';! in a command file, will actually 
referenee and use the GLINE routine. Both of these eventscause errors to occur: 

in the first, because the date in the buffer is olobbered with a 7600; in the second, 
because GLINE may have become destroyed. 

CORE: . 

These changes insure that GLINE is not modified by a 7600 store if GLINE has been 
overmmitten by the @ buffer. In addition, if GLINE has been overwritten and a 

trailing '4 occurs in an @file, the error message "71/0 OR ';! ERR" is 

displayed on the console and a return is made to the keyboard monitor. 


#57950 CCL.PA V3D PAGE 2 of 3 
GROCOM V4A 


2? 


1003 
L004 
OK KK 

22004 


IS a es reser 


1)104 
abe 
‘Ld 
KOK IK 
Qd1G61 
a) 


ee) SEMSGS y_ TEXT /PDEVICE FULL / 


: 7 #30 - PAGE 61 
/JCOL FOR DECSYSTEM 8  V3E 

—/CCL FOR WECSYSTEM 8 Van | 

Z JUL 29% 1978 FIX SEMICOLON | PROCESSING ROUTINE 
/ FORMAT OF CCL TARLE 


/ FORMAT OF CCL TABLE 


SEMSGl» TEXT /PENTER ERROR/ 
SEMSG2s TEXT  ~NPI/ZO OR 497 ERRORN 0 
SEMSG3» TEAT /?QHEVICE FULLZ 


“SEMSGLy TEXT ~ 7? ENTER ERROR 


SEMSG2y TEXT \N?I/0 ERRORN 


ROR OK KK 


1.108 
Ld 
Ld 


ye Aegon ne ee ee qe 


‘L) 
2K KOK 


27108 


a) 
a) 


2) TEMNAMy FILENAME 


“TRATATIZG Te FRI 2405 TF FORT Py 21S FAL ae 
"RE SI"YS"SH Se PCH CH BR TH CH HS ee Te Me eT ALE 


"SSTER NED 


TEMNAM, FILENAME CCBTCH.TM 


~RATAIL “se "Re 240s "Fe Os Te PS QS Fe 


212 


"KO"SHTYS "Se Se "CeCe "BS" Te 8Ce tHe ee TEM eT SH QLS 212 


"Sy "EGON OLS 215521253250 


THOR ACC K OK OK 


TAD I (GLINE+1 
TAD (-1163 7MAKE SURE GLINE NOT CLOBBERETL! 


OB Sc et Pe OF 


oe ON AT CLA TP BY 78 CONE ees Be 


a 


JMP oo +4 7ALL OK 
TAD BATBELK+1 7ZERROR JUMP CIF @ ANI TRAILING 35) 


NCA NEWEN<t "= YINGSTEAN OF CALL ee 


JMF eo +3 
TAL €7400 


TAY COTRECK ZFORCE “CIN GLINE TO GO TO 746007 7 


JMS BATLST 
BATHETL 


EE AE ONE SINT XR OSS ee 


$2 y TAG I XR 


Sa ama 7-9 (ial 6 ale at ae 


NCA XR 
TAN €7400 


JMS BATLST 
BATHET 


Ogee RE RO ee rey eee 


FOR IO IOK 


7KKKKXPREVIOUS LINE MAY BE JMF SEMER2 TO PREVENT USE OF 
/ ‘GLINE’ AFTER IT HAS BEEN CLOBBERED BY AN @F TLENAME 


ARKKK WHAT TF WE’RE RUNNING UNDER BATCH &x&kK ~~ =F 


NEWLNy TAL CBEGLN= 1 
NCA Xk 


DC ATI COTRLONR OO ZFORCE TC TO GLINE TOGO “TO77600 


2211 /KKKK WHAT IF WERE RUNNING UNDER BATCH ®44* — 57950 CCL.PA V3D 


9) TAD (BEGLN~-1 Page 3 of 3 
| 2) ane DCA XR a 
© FEO OR | | | #30 - PAGE 62 

1)111 = JMS RATLST 

15. BACRLF . 

1 Se IMP ce Rie eer ya eg ye arn eee 


2)111 TAN (215 

7 ea | |<< - S 
2) TAL (212 

2) JMS BATFUT 


ys ee I ok INI ae Be gy megs TN ee ee ne 


KKK KK HK 


19113 SEMER2y» IAC / I/Q ERROR OR INVALID TRAILING + 
Ld SEMERL» IAC /ENTER ERROR 
Yn 
29113 SEMER2» TAC / I/0 ERROR 
2) SEMER1y», IAC 7ENTER ERROR 
KOK KK KOK K 
| 


_UARCO FORM NO. 81 307-34 


be me cee mt et tr ee oe ee ee me ee es meee ts ee Rte 
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SOFTWARE ~~ _— 9/3493 
PERFORMANCE . 
REPORT FOR DEC USE ONLY Pago of __* 


MONITOR AND VERSION 
0S/8 Extension Kit 


DEC OFFICE 


Blue Bell, PA 


OATE 


6-AUG-78 


SYSTEM PROGRAM AND VERSION (OR DOCUMENT) 


BASIC. FF 


nameLyle P. Bickley 
Fiam:Bickley Labs 


REPORT TYPE PRIORITY 


avoress:47 Ivy Mills Road (X) LocicscopinG ERROR [) Low 
RD2 (1) DocuUMENTATION ERROR [") stanoarpD 
Glen Mills, PA 19342 [_) suGGESTION [0 HiaH 
[ inauiry 


SUBMITTED BY: PHONE: 


Lyle P. Bickley 215-985-7733 


CAN THE PR Pp 
LIST ATTACHMENTS OBLEM BE REPRODUCED AT WILL? 


(1)patch, (2)sample program KY ves [Jno 


CPU TYPE SERIAL NO. SYSTEM DEVICE [MEMORY SIZE DISTRIBUTION MEDIUM 
PDP=12 561 RFOS 16K DECTAPE 


PROBLEM: 
Invalid "FE" errors at run time when OPENING a file after a previous CLOSE. Under sone 
conditions the system crashes and the system mst be rebooted. 


[J FoR YOUR INFORMATION 


DIAGNOSIS: 

BASIC.FF de-allocates driver space but does not communicate this information to 0S/8's 
USR by medifying the device residency table or performing a RESET. In other words, 
BASIC thinks it can load another device handler in previosly used (but now assumed free) 
handler space. Unfortunately, USR does not understand what has happened(it onJy can 
assusis the device residency table is correct)! Thereforg if a previosly opened xauizt 
and closed file is referenced afer BASIC has loaded another handler in its slot, very 
serious problems can occur (destroying the system device's data, etc.). 


In addition, due to another bug in the same routine in OPEN, the OPEN routine sometines 
thinks there is inadequate driver space available when such space should be available 
after a CLOSE (and the above bug is fixed!). 


CURE: 

This patch corrects both of the above problems. BASIC.FF does not attempt to free 

driver space until it is possible for it to issue a RESET to USR. In this way, both 

USR and BASIC agree as to driver residency. A sample program is included to 

eee the fix. For those interested, the meumonics for the patch are shown 
low: 


#13455 (contimed) 
TAD MM CIF 10 /ALL FILES CLOSED 
DCA TEMP3 JMS I USR 
TAD TADINS 13 /PERFORM RESET 
DCA CHECK CLA 
DCA I WORD4 /RESET FILE OPEN DCA DMAP /FREE ALL DEVICE HANDLER 
TAD WEPTR CRETN, JMS I PiSWAP SPACE 
DCA TEMP1 JMP I ILOOPL 
TAD I TEMPL TADINS, TAD W+PIR 
SZA CLA 
JMP CRETN /ALL FILES NOT CLOSED, CAN'T RESET 
ISZ CHECK 
ISZ TEMP3 
JMP CHECK 
SOFTWARE COMMUNICATIONS USE ONLY 
DO NOT DATE RECLCIVLO BACK FROM MAINTAINER LOGGED ON 


PUBLISH a (TO MAINTAINER DATE CLOSED LOGGED OFF 
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"#57949 ~«S«&BASIC.FF  V3D PAGE 2 of & a 
aU ghee te Pep ee eer a PI => ote ose oe See! = ea esse tees! 
.GE SYS BASIC.FF 


on 


ae 


13465/1042 7640 $5277 22629 2042 $5262 $ 62125 4522500123 
13475/7650 72004530354 45739 557091331 


13455/1466. 13355 S04261 3019 2625 347251 3351 SO40F 144 eg 


SESS SIS GTRAC GT ORGS SY OL pe OOF es con Ee i os oe ee ge ee oe 


SE 
«SA SYS RASIC.FF 


#57949 + &BASIC.FF V3D PAGE 3 of 4 

LS A TEST PROGRAM TO TEST AND ILLUSTRATE 
: SHATCH WESCRIBED ALOE. THE PATCHEN BASIE 
4i....28 SAVED UNUER THE NAME ‘“NBASIC. EF’ 


nm ee te 


a ; RAS te en nn hates Saas aad ae littaacrd a Madras ete! Alo rs ve 
NEW OR OLD--OLD TOTEST 
iy daa aS Nocera Ry eS Sa a Sh a - op oa = wean a Rte Mi Se ees ~~ fa, 


READY 
LIST 


TOTEST BA 5A 24"UL-7a 


LO PRINT\PRINT "FROM"$\INFUT I$, 
20 PRINT "TO"$\INFUT OF 

AO FILEY #2!04% —_ 

SO INPUT £1tX$ 


‘40 TF_END #1 THEN 90. 


7O FRINT #2°X% 
80 GO TO SO 


sd IM 14620) 909020) yX$ 080) IAT ae ee eae ee eT Te Se ore ene eee 


Ss Nt ae sp ha tt Pt eo 


eS LY eee Ms se tS aa Te a a eg ee a ere ee 


100 CLOSE #2 
110 GO TO 10 


i eh Pe SA a a sg nse Sera lee “ae ine eye ee ani eee 


RIEATIY 


RUNNH 


TOPLET ¢ 


PRINTED IN U.S.A, 


Sor rere 2611  O We 8 |e 2 0 eee ee ee ene Sen ee nee eee PO ae Ca ee 


TOPTTY?: 


feesetenrer ot Soa 8 Mes et S| ae 0 102: 50 a gee oe NEE 2 RCC Ce ee Cn ee 


REALTY 


Fm a a 


a 


PRINTEOIN U. 


¢ 


NOTED THE. ABOVE ’FE’. ERROR.IS INCORRECT! THERE SHOULD 0 0 


BE PLENTY OF DRIVER SFACE AVAILABLE AFTER BOTH CLOSES. 
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“"RGEY BASIC.FEENBASIG+FF 
FILES COFIEDS 
uA NBAGICTE fone. a, dideechetere RT Ieee Tre: eases 
#57949 BASIC.FF V3D PAGE 4 of 4 
+RASIC , 
— NEW OR OLTI--OLD TOTEST oo Ft ee ee _ seh eee: _ 
REALLY 
mise OLN a he a A eee a8 cape ces et Die sate 6s a Eis wit a! es Enten 
IOTEST BA SA  24-JUL~78 
FROM? OTAO’ TOUMP. EU 
na 662 Int Se NN Re ee BD is en LIL pny al Pain ah Spe it sal thee ee 
FROM?PDTAO: TOUMF.EU 
Perr 2 1 1 Se ee ee ee See eee pS Tae eatin thas ie Does Reese ee 
t | 
“NEWS LivleyNUMPs TEXT» CRLF vyAvyByCr Dv Ee F oGe 
- QUMFt=/“COUE’ DUMPS a ais 
TEXT?=’CODE -¢ 
Seat 2) eae eee sees et tulig Ie riecanme ees 


¢ 


SOFTWARE 573948 


PERFORMANCE |)’ ' #30 - PAGE 66 
REPORT FOR DEC USE ONLY Page of _3 
SYSTEM PROGRAM AND VERSION (OR DOCUMENT) 0S/8 AND VERSION DAT 
BASIC .FF 03/8 Extension Kit V3D 6-AUG~78 


DEC OFFICE 7 
Blue Bell, PA 


namMeLyle P. Bickley 
Firm: Bickley Labs 


REPORT TYPE PRIORITY 
aooress: 47 Ivy Mills Road (X] Locic/cooine ERROR (7) Low 
RD2 [7 DocuUMENTATION ERROR [_) stanparp 
Glen Mills, PA 19342 (7) suacestion £3 niet 
[7] inauiry 


SUBMITTED BY: _ 


PHONE: 


215=985=7733 
CAN 
ET ATTACHMENTS AN THE PROBLEM BE REPRODUCED AT WILL? 


(1)patch, (2)sample test program Kives [Jno 
CPU TYPE SERIAL NO. SYSTEM DEVICE MEMORY SIZE DISTRIBUTION MEDIUM 
PDP=12 561 RFO8 16K DECTAPE 


PROBLEM: 
BASIC.FF generates invalid error messages when file #0 is opened (see example). 


[_) For YouR INFORMATION 


DIAGNOSIS: 
BASIC.FF's OPEN routine modifies the file table before determining if the file 
is file "0" (the system console). OPEN should not modify the table at all for 
file "0" (4.e. it should be a NOP es per CLOSE). 


CURE: 
This patch canses OPEN to test for file "0" before attempting to modify the file table. 
If the file is #0, a logical NOP occurs and an inmedithe return is made from open. 

(see example program for effect of fix!) 


#57948 «=CBASIC.FF = V3D PAGE 2 of 3 


2 
é 
oO 
Ww 
 ~ 
ra 
x 
a. 


«GE SYS BASIC.FF 


OD 


14000/ 9466. S227) nce des wee cle wos ey Hee, es pee oe re eee: ee ee ee 
14010/1472 3363 

14163/5227 12275 3466914725 5211 

dhe le ee 

.3A SYS BASIC.FF 


SOFTWARE COMMUNICATIONS USE ONLY 


DO NOT DATE RECEIVED BACK FROM MAINTAINER LOGGED ON 


Pee ene ma nee SOFTWARE COMMUNICATIONS 


eee be cea = nee ee ise e de oe ae epee ee en 


A 


PRINTED IN U.S.A. 


! eee #30 = PAGE 67 
™ $5798 BASIC.FF V3D~ “PAGE 3 of 3 | | 


THE PATCHED BASIC IS SAVED UNDER THE NAME ’N&ASIC.FF’. 


»BASIC 
5 ON IR 20) ep A a ts a Ree ee ee A ais ee el 


RIEATY 


_ ‘| 
THIS. FROGRAM DEMONSTRATES AND TESTS THE ABOVE FATCH TO “BASIC.FF’. 
! 
|e 
| | 
pase tc 
! { 


OFTEST BA WA 24-JUL-78 


| 4 DIM X#(80)° 


20 FILEY ENE "WHEN N=0O THIS 25 NEVER LOOKED AT BY OPENI® 
30 INPUT X% | 
| 40 PRINT #Nt Xe 
9 Salt Wiley Se epee 8 | seen | <4 8 esa cette? a ete ee en eee er me a eT 
, 60 CLOSE in 
i 32767 ENT 


— 


1 READY 
| RUNNH . | | 
|_?NOWTS_THE TLE eee 
| 


VR AT LINE 00030 


a7 aa A ae a 


re See haa ed ee a ens ee oy eee 
NOTE! THE °UR’ ERROR AROVE (ATTEMPT. TO READ VART@BLE LENGTH FILE) 
| I$ ORVIOSLY INCORRECT! 


ee ei ne DN re a 


co 


»COPY BASIC«FF2NBASIC.FF 
| FILES COFTEDS$ 
se IN Rg Ea De eS a tg we ea a eg Set 


«BASIC 


Oe SNE We ECON TEST tetere acen SP eet axe vats hdd Met ati gl dando ite 


| READY 

Hie et oh etcrhatees bya fthut Atos ON Oe eet el ul eee amine eet tak, eth da 

| @NOW IS THE TIME 

NOW IS THE TIME 

dieses POR AI GOO iy. secur artes ieee Ba Cent eneetee a heed ud labsa> ieicoabntintteiiels® Gfaks et haulas len 

FOR ALL Goon 

?MEN TO COME 

Race, POC COME to ft: acetate aoe eae deumncas a & 1th «uikdaepeieliant Pease ace 

TP Pann 

AND 

. PSTOP ow. . semble, dalla: culigeh Bo few, tetée, sv, seapteancieeecides. 0 
STOP 


READY 


#30 - PAGE 68 


PROCESS CONTROL SYSTEMS, INC. 


18130 S. Thornapple Lane e New Berlin, Wisconsin 53151 @ (414) 782-3945 


HARDWARE CONSULTATION August 22, 1978 
SOFTWARE. DESIGN 
PROCESS CONTROL SYSTEM DESIGN 

Mr, Robert Hassinger 

Liberty Mutual Research Center 


71 Frankland Road 
Hopkinton, MA 01748 


Dear Bob: 


These are date patches to OS8BOL, The BOOL=143 Control Equation 
Translator for the 0S/8 Industiral 1h software package. The year 
on the page heading will be eorrect instead of in the range 1970 
1977. 


For 1978=1979: For 1980-1985: 
GET SYS OS8BOL GET SYS OS8BOL 
ODT ODT 
2066/1 362 (1357 2157/XXXX 0016 
2157 /XXXX 00 30 | 2164/0027 0030 
Cc Cc 
SAVE SYS OS8BOL SAVE SYS OS8BOL 


These are date patahes to OS8PAL, the PAL-1)3 Symbolic Progrem 
Assembler for the 0S/8 Industrial 1) software package. The year 
on the page heading will be correct inatead of in the range 1970+ 
1977. | 


For 1978-1979: For 1980-1985: 
GET SYS OS8PAL GET SYS OS8PAL 
ih 6/ 6 5667 /KXXK 6 
1371 1367 7 001 
$367 00 30 3373/0027 0030 
-SAVE SYS OS8PAL : -SAVE SYS OSSPAL 


| oo truly 

g) 

pb £ Joy~ 

Michael E. Mazszoni 
President 


MEM: blm 


MINICOMPUTERS e MICROCOMPUTERS e PROGRAMMABLE CONTROLLERS 


DECUS HAS MOVED!! 


As of August 14, 1978, the DECUS International Headquarters and DECUS 
U.S. Chapter offices will be located at Digital Equipment Corporation in 
Marlboro. Our new address is: 


DECUS 

MR2-3/E55 

One Iron Way 

Marlboro, Massachusetts 01752 


Marlboro is not on Centrex, a direct access telephone system, so all calls 
will come thru the switchboard at (617) 481-9511. 


DECUS extensions are as follows: 
Central Number 4100 


Executive Director 4120 


Admin/Finance 4122 
Order Processing 4135 
Accounting 4136 
Membership 4166 
Publications 4131 
Library 4177 


U.S. Chapter 4141 


DECUS 


DIGITAL EQUIPMENT COMPUTER USERS SOCIETY 
ONE IRON WAY, MR2-3/E55 
MARLBORO, MASSACHUSETTS 01752 


MOVING OR REPLACING A DELEGATE? 


Please notify us immediately to guarantee continuing 
receipt of DECUS literature. Allow up to six weeks 
for change to take effect. 


Change of Address 
Delegate Replacement 


DECUS Membership No.: 
Name: 

Company: 

Address: 


State/Country: 


Zip/Postal Code: 


Mail to: DECUS - ATT: Membership 
One Iron Way, MR2-3 
Marlboro, Massachusetts 01752 USA 
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